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- ABSTRECT 
THIS PROGRAM IS AR MEMORY EXPANDABLE INTERACTIVE BUS EXER- 
IZ 


ibiloiad"Elni Vameuere.OHpORaE'T, CetRELIGEE Het 


THI IS NOT 
CHECK OF PHE YSTEM. IF AN ERROR 
IT WILL PROBABLY BE 





10 Cc EC T . MA 1/0 Oevick THE RESPECTIVE DIAGNOSTIC. 
FOR tHAT DEVICE. 
N THIS VERSION THE i trae an ue ROUTINE FOR THE 
DISKS, KM. Te eueent wea HE NPR DATA BUF. ERS ARE 
é. REQUIREMENTS 
é.1 EGUIPMENT 


PDP-11 STANDARD COMPUTER 
e.8.4 OPTIONAL HARDWARE THAT THE PROGRAM WILL EXERCISE 
UP TO @8KW OF MEMORY 


MM11 

RC11 DISK 

RK11 OISK 

RP11 DISK 

RF 11 DISK ( 

Tell CTAPE- ORT ONE 
KEL1IAQ EXT ae cae ee UNIT 
KWIilL LI 

PCi1 HIGH SP ge ih 

bil Cine ce ELEPRINTER-LC11, VTOS 
LSil PRINTER -- See §.2.11 


e.2 STORAGE 
©.2.1 PROGRAM STORAGE - THE ROUTINE USES 
4K OF MEMORY 


: LOADING PROCEDURE 
3.1 METHOD 
PROCEDURE FOR NORMAL ABSGLUTE TAPES SHOULD BE FOLLOWED. 
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STARTING PROCEDURE 
pas Sucoce Pn Pronee N MODIFIED TO RUN WITH OR WITHOUT 


A CONSOLE FA MACHINE IS USED; THEN oo PROGRAM 
SurTcH’ REGISTE 


Caren ane MARRY CHE. ETR™ 


te a oe BoD AS OF THE OPERATOR TO aad UP 
THIe LOGATION PRIOR TO STARTING THE PROGRAM 


REQUIRES TWO BELLS ON THE T — 
THE PReHROE on TeGd ait 


THE ae hn E BIT CLEARED. THE SECOND BELL MARKS THE 
il AN INSTRUCTION TEST PASS WITH THE TRACE BIT 
5 


CONTROL SWITCH SETTING 
STARTING AT SA 200 ALL SWITCHES SHOULD BE SET AS INDICATED. 
STARTING ADDRESS OR ADDRESSES 


(A) 200 = SR = 000777 TEST PROCESSOR ONLY-WITH CORE EXPANSION 
(B) 200 = SR _ = 001777 TEST PROCESSOR ONLY-4K-INHIBIT 
(C) 
(D) 


CORE. EX ION 
200 = XX TEST I70 ONLY 
SR = -CORE EXPAND AND TEST ALL AVAILABLE 
170 DEVICES 


eae i er 


NH : une CBee 1, RC11 AND RP11 DISK(S) 
ei an 


: TC11' DE 
LIne oo etek --- IF LINE PRINTER IS USED, 
BE 


IF EAE ctWet eS CL Be BUTOMATICALLY SELECTED 


b= bn bh fo fee fo pe 


EaRE 


_——— 


ON 
EO1 
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“.3 PROGRAM AND’OR OPERATOR ACTION 


O80 PROGRAM INTO MEMORY. 
hae Sanaa REGISTER TO STARTING ADDRESS. 


L : 
SET ati roe TO INHIBIT NON EXISTANT DEVICES 
SS START. 


PROGRAM WILL LOOP AND 
ai WILL nine ONCE PER PASS OF THE PROGRAM. 
A MINIMUM OF TWO PASSES SHOULD 
WAYS RUN. 
5. OPERATING PROCEDURE 
OPERATIONAL SWITCH SETTINGS 


. 
- 


S.i.1 AT SA 200 .. THE INSTRUCTION AND LOGIC TEST. WITH ALL SWITCHES 
DOWN THE PROGRAM WILL TEST ALL DEVICES AND PRINT OUT ON ERRORS 
AND CONTINUE IN TEST. (BELL WILL RING AT COMPLETION OF A PASS) 
S.1.2 SWITCH SETTINGS ARE 
SWIS = 1 OR UP ... HALT ON ERROR : 
SWi. = 1 OR UP ... SC LOOP 
SWi3 = 1 OR UP ... INHIBIT PRINTOUT 
SWi2 = 1 OR UP ... INHIBIT TRACE TRAPPING 
SWil = 1 OR UP ... INHI T ITERATION LOOP 
SWiO = 1 OR UP ... INHIBIT ESSOR TEST 
SWOS = 1 OR UP ... INHIBIT VARIABLE CORE EXPANSION 
SWOS = | OR UP ... RESTART ON ERROR 
5.1.3 
5.2. SUBROUTINE ABSTRACTS 
S.2. BEGIN SA 200 
5.2.2 SCOPE 
THIS SUBROUT INE CALL IS PLACED BETWEEN EACH SUBTEST IN THE 
INS RUCTION SECTION. IT RECORDS THE STARTING ADDRESS OF EACH 
5TESt AS IT I BE ING ENTERED. 
IF OOP IS REQUESTED WITH SwW14=1; 
IT WILL J TO THE START OF THE SUBTEST’ THAT THE SCOPE Loop 
IS REQUESTED FOR. IF SCOPE LOOP IS NOT RE TED, THERE WILL 
BE EITHER A FIXED OR RANDOM NUMBER OF ITERATIONS ON THAT SUB- 
TEST BEFORE THE NEXT SUBTEST IS ENTERED. SWITCH 11 ON A! 
INHIBITS ITERATION OF SUBTESTS 





IS A ROUTINE THAT PRINTS- 50uT aN N ADDRESS TH TWAT TAGS THE FAILING 
TEST, THE STATUS REGISTER HE FOILURE 
AND THE PROCESSOR TEST BEING EXeUTED ay THE TIME 0 


LURE . 
TRTRAP 
THIS ROUTINE WILL ALLOW THE TRACE BIT TRAP TO BE SET aFTES 
FIRST LOOP OF THE PROGRAM. UNDER TESTING THE TRACE 
BIT WILL SET ALTERNATE LOOPS OF HE PROGRAM 
SE7 IT C S A TRAP AFTER H INSTRUCTION. THE a BS 
INSTRUCTION EXECUTED UPON TRAPPING IS AN “RTI” WHICH RETURN 
TO THE INTERROB TED SEQUENCE OF INSTRUCTION. 
TRAPCATCHER 
THIS IS A SERIES OF INSTRUCTIONS STARTING AT LOCATION 

SIGNED 0 DETEC CT. AND ISOLATE UNEXPECTED TRAPS GNC 

TATERRUPTS 10 THE TRAP AND INTERRUPT VECTOR AREA oF 


TAINS THE 
ETION WHE RE 





TTYINI (TTY INPUT) 
THIS S_IN THE gh geal MODE 
AND CHECKS FOR A'c A COUNT PATTERN IN THE READER 


TTY. INE WILL ACCEPT AN ga NITE 
sats pba telt haan ate cs 


Eers ES wet ONE GREATER. 


ROUT Cc SA 
207 ( THE I <3 | GNORED, IF NOT A 
rat 8 TES TING THE TTY ; 
READER T HE TAPE MUST HA COUNT PATTERN AND BE 
LOCATED ON THE LEADER PORTION WHEN STARTING TEST. 


TYOUT <TTY OUTPUT) 
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THIS IS A ROUTINE THAT OUTPUTS A COUNT chy IN 
THE INTERRUPT MCDE TO THE Me ae at Ah PAPER 
TRE IS PUNCHED IT MAY HAV (PEL si' IN IT. 
PUNCHED WHEN THE BELL FOR 3” COMPLE RINGS. 


S.2.8  RFSTART (RF-11 DISK) 
THe onYa Tir TS URifrEN-On tHe bisk™te Bakt-or fest” Baouee 
ODE THAT IS NEVER MOD TH ASE SEGRENT CORE IS WRITTEN 
E CHE 


a 
Un cot tauoug Boge, Tee The, ot ee Eck is at Wenien THAT 


nn 


HECK 


The pre aoe aust AFR HESS TEE IRERE not 1° TRANSFERREC 


INTO CORE). 
ERRUPT SERVICE ROUTINE AND 


THE INT 
DATA ER I THE CUR 
BANK THAT INSTRUCTIONS PRE BEING EXECUTED IN. 
5.2.39  FENDZ (TCil FORWARD END ZONE) 


VECTOR (215 ." “This Rout Sgt Witt READ, "IN REVERSE, BLOCK 
POINT IN NTERRUPT AN CORMAND REGISTER aR oat ‘Pogue reo 


TO READ 
BER COUNT WITH THE EXPECTED BLOCK 


K 0)"8 Me oir Is 
aS: TIE (e'belteh nfo Pe Pohee USES 
i ibe Hee NE UIE Pur RT, 


Tr T 
Des THOVED aa vrs & A READ OPERATION IT MAY BE NECESSARY TO 


5.2.10 LCLK (LINE CLOCK) 


WUE. "=PP Spe SG hb SARE ISA DENT 


SS SECO 
Wace lable a ettalte MET hed bes. 
S.2.11 LPl (LINE PRINTER) 


a) Se ROUTI Ae OU Ma TO THE LINE PRINTER IN 
ILE FILLING THE BUFFER IN 
BAT INTERRUPT MODE WHILE THE BUFFER IS BEING 
FOR 132 COLUMN PRINTER CHANGE LOCATION LPSO FROM LI7 TO 202. 
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S.2.12 WHSRINI (PCli INPUT) 
Sabs BATH TENE etl, Meader Yer REDE SARE GE. ER * 
AN INFINIT Zeno BYTES, (BLANK pa , gut THE FIRST 
myst THAT is NOT. NOT ONE AND ALL ASE QUENT IAL gires 


¥ GREATER,” Bake: NTE ROUTINE. DETECTS AN ERR 
WHEN Testl 6 THE HSR 


READER T T ey? COUNT PATTERN 
LOCATED On THE ape TUET TION WHEN ST TING TEST. 
S.2.13 HPOUT (PC11 OUTPUT) 
THIS IS AR ROUTINE THAT OUTPUTS A COUNT PATTERN Ii THE IN- 
TE T TO THE HIGH SPEED PUNCH. 
S.2.14% RKSTART (RK-11 DISK) 


THIS ROUTINE PERFORMS A oe AND 
THE ogre. HAT IS ph TEST PROGRAM 
S_ NEVER MOD ORE IS _ WRITTEN 





$.2.15 RCSTART (RC-11 DISK) 
THIS ROUTINE oy Tee Rake a 5d THE DISK. 


Ea ea a A age ar 


CONTI MEMORY. AFTER T AL 
Le 4 — 3 USED TO VERIFY gg 


giao hee Y ON THE DISK. NOTE T NO 
HE DISK (DATA IS NOT TRANSFERRED 


BEN Fa VSR ETTORE PPE 5 ZERUEESTR, 10 THE commen 


S.2.16 RPSTART (RP-11 DISK) 


ARE IE TG SS ST BCD HET 


ODE THAT IS MODIFIED. THIS SEGMENT IS WRITTEN 
S CONTI THRU THE DISK ORY AF TE THE T 
ISK(S) N OCAITTEN A E K IS USED TO VERIFY THAT 
THE 7paTA RHAS 8 EEN WRITTEN CORRECTLY ON THE DISK. NOTE an tet NO 
: a: ERRUT SeRvie cDISK { DATA 1S. NOT T RAN F FERRED 
INTO CORE). “THE ANT t Benne eat Ne TRUCT Tone o ARE B PEER 


EXECUTED IN. (FOR THE RPOS THE ISR MUST BE MOTIFIED 16 teey THE FULL SURFACE 








101 
1:05 Peace §s 
5.2.17 CORE EXPANSION (DET1) 
TH S ROUTI IS CONTROLLED BY SWITCH 9. THE PROCESSOR 
qiilLl BE EITHER “KW OR EX TO MAXIMUM 

CORES ar’ IS ava TLABLE. THE ROUTINE BE TERA THE 
WHEN 5 D wr BRNK Ts A 
FERRED T H XI . N CODE I ACH BANK 
IS MODIF SO WHEN THE LAST SUB TEST IN A MEMORY 

1s CUTED THERE IS A JUMP RTED TO THE FIRST Sue 
TEST ; N I BANK THE MODIFIED 


THE LISTING SHOWS ONLY THE CODE OF BANK ZERO. sit-N AN 
ERROR OCCURS THAT IS NOT IN BANK ZERO. IGNORE THE BANK 
BITS OF THE PRINT OUT AND USE THE eT et rine FOR BANK ZERO. 


$.3 PROGRAM AND/OR OPERATOR ACTION 


5.3.1 LOADING AND STARTING AT 200 WITH ALL SWITCHES 

DOWN I TESTING. IF AN ERROR Is 

DETECT T WILL BE A PRINTOUT. WHEN 

AN ETECTE ED AND I 1S NECESSARY TO 

SC ON SW1S TO HALT ON ERROR 

THEN Rin PBOP on ERROR, THEN SW13 fo 

DELETE tORINTOUTS. THEN THE MACHINE MUST BE CONTINUED. 
* ERRORS 
ost ERROR PRINTOUT 


ARE I THREE WORD FORMAT, THE 1ST IS PC+2 OF THE 
DETEGED. ERR THE 2ND. IS’ THE STATUS REGISTER 

THE PROCESSOR TEST AT THE TIME OF THE ERROR 
(CON ENTS? OF RETURN) 
REFER TO THE LISTING FOR DETAILED INFORMATION. 


6.2 ERROR RECOVERY 
FOR TTY ener AND HSR, TAPE MUST BE REPOSITIONED TO 


LEADER BEF RESTARTING TEST. IT YOU DESIRE TO HAVE 
THE ROGRAN ESTART on AN ERROR MAKE SWITCH REGISTER 
BITS AN ONE. 
RESTRICTIONS 

7.1 STARTING RESTRICTION 


IF LINE PRINTER IS USED RESTART ADDRESS MUST BE 400 
FOR HSR AND TTY READER, TAPE MUST BE ON LEADER. 


Tue OPERATIONAL RESTRICTION 
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IF OPERATION UNDER MONITORS, THE CONSOLE DEVICE,LINE PRINTERS 


AND THE SYSTEM CEVICE ARE NOT TESTED. 

MISCELLANEOUS 

TRACKING DOWN UNUSUAL FAILURES 

FAILURES THAT MAY ¥ OCCUR BECAUSE OF A FALSE ENTRY 
INTO A SUBTEST FAIL LURE N A CONTROL ROUTINE 
RATHER THAN B gust fee a TECTION OF T SE MAY BE 
ACCOMPL I SE ae IS A 
LOCATION “RETURN” THA THe AST suUC- 
TION CA 7 HAT’ SHO N MANY TIMES. THE 
SUBTEST BEEN EXECUTED ANOTHER LOCE - 
Pap ati hg Ph THAT CONTAINS THE bbe cous 

IS € ‘ ty #: a PRCT Ton XEC TION tn CON 
USING S ITUATION at ATION FOLLOWING THE 
SUBTEST H TO THE FIRST 
INSTRUCTION 6 T 2," ent FIRST LOCATION FOL- 
LOWING T shocAl ION) THE “HLT” LO- 
CATION MAY BE NOP" 


A USER MAY ADD A UNIQUE ROUTINE TO TH 
A NON DEC OPTION, FOR CHECKING BUS IN 
EXISTING DEC OPTIONS. 


FOR TROUBLE mee INTERACTION THERE ARE A FEW GROUND RULES 
THAT SHOULD BE FOLLOWED. 


1. USE NO REGISTERS. 
THE ROUTINE SHOULD BE STAND ALONE. 
THE EXISTING “HLT™ SHOULD BE USED FOR ERROR DETECTION. 


CODE IN THE PRIMING AREA SHOLD SET INTERRUPT 
ENABLE, INITIALIZE DATA AND RAISE A FLAG IF NECESSARY. 


S. THE INTERRUPT VECTOR STATUS WORD SHOULD CONTAIN THE 
PRIORITY LEVEL OF THE DEVICE. 


6. THE INTERRUPT VECTOR SHOULD POINT TO YOUR STAND ALONE 
ROUTINE. 


S_ TEST TO EXERCISE 
ERACTION 


I 
TER N WITH HIS 


£ WwW fv 


a Ht atone OR atin Bare cae WHEN COMPLETING ALL HOUSE KEEP ING 
TA COMPARISONS SHOULD THEN EXECUTE A 
CRT Ie 10" RETURN TO MAINLINE CODE. 


INSERTION OF USER 1/70 ROUTINES 


i. MAY BE INSERTED IN BANK ZERO WHERE I’0 ROUTINES EXIST. 
FOR DEVICES THAT THE USER DOES NOT HAVE, IF CORE EXPANSION 
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IS TO BE INHIBITED, THE USER MAY OVERLAY THE EXPANSION CODE. 


2. IF THE USER HAS MORE THAN 4KW OF CORE. THE ROUTINE 
MAY BE PLACED IN ANY OF THE EXTRA BANKS AND CORE 
EXPANSION BE INHIBITED. 


NE. THE USER 
RTS ~7 INSTRUCTION. 
EXECUTION TIME 
ae LE. ware WITH a OF DEVICES, FOR 4YKW YSTEMS WITH 


TTY AND HSR O ABOUT 1 MINUTE WITH THE TRACE BIT CLEARED 
ABOUT 1.5 MINUTES WITH THE TRACE BIT SET 


PROGRAM DESCRIPTION 










THE Met the NG PRI Aly 1 arenas R IS DICATED 
ER TAPE 
SvSTEn men EASY TO 
+ FIED 
Bun Fe TO ise 0 A WIDE’ set rho IPHERALS, 
NC T . THE 
7," Us NG CONCUR- 
RENTLY W HE 


HE 
pee Be WHICH 170 
ao TIME. 










3 i F I ist W 
RPh od RY YO, STOP INE EXER 
ISER AND RAND 


T I TTOR IN T NTIONAL SENSE. EACH 
DEV THAT. 1 ts 0 ¢ Rea F aa IT’S OWN STAND A- 
OE. 


eye IN On ent 


art Y a haat MER AREA THAT 
CHECKS THE SUIT an Rec! thet sf PRINER A ARE 
ENABLE ‘BIT Th DEVICE Ther ie GI Seis, THe, INTERRUPT 
I aye ih pA T AND ale Ss BN OPERATION TO 
RA T nel ves, ON HAT CAN NOT INITIATE 

ine PRIMER JUMPS TO THE PRO- 
Ob Scon per WHERE NDIVIDUAL DEVICES ARE SERVICED 
AT THE INTE T RATE 


THE INSTRUCTION exerciser IS A STRAIGHT LINE TEST 
OF INSTRUCTIONS. THE SEQUENCE IN WHICH THEY ARE 
EXECUTED IS THE SAME SEQUENCE IN WHICH THEY ARE 


_— oo = 
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SHOWN IN THE LISTI EACH AREA OF CODE FROM 
AND hen o6 ON 
" R IF SWITCH 
T ING NEXT -TEST. 
ae LEAVE T Cc N 







nich ay LE 
WILL BE SWAPPED 


AFTER THE MODES AND INSTRUCTION HAVE BEEN PROVEN 


IN THE Sere RE THEN TESTED IN THE BYTE 


come ERAT On I STED IN NESTED C repens THe MBC 
oar aie ero eek PT He's theRe ie 
ALSO AND AUTO RECOVERY 
WHICH IS NOT ENABLED UNTIL AFTER THE FIRST PASS OF THE 
REASON FOR EXECUTING ALL INSTRUCTIONS 
WITH THE TRACE BIT SET IS To TAKE US INTO SERVICE AT 
THE END OF EACH INSTRUCTION 
THE CORE LAYOUT IS BROKEN INTO FIVE DISTINCT PARTS: 


THE TRAP CATCHER 
THE SET UP AND I70 PRIMER AREA AND 1/0 TEST ROU- 


1) 
2) 
fh THe’ PRocesson TESTS 
S) 















AND 
ONTROL AND UTILITY ROUTINES. 
CORE DETECTOR AND EXPANSION ROUTINE. 


aftr et 


10. LISTING 
ll. FLOW CHART(S) 
° NDR 
ENABLE ABS 
TPE SHARDS, SAR 12a, LETH BASES AS Sh a Bde Gtr Me 
ante "HOb=643 ENABLED TO B IDER MAINE I FON 
etejatet HLT : TRAP m YOR ERROR SRINTOUS 
104400 SCOPE =TRAP ; TRAP USED SCOPE LOOP AND ITERATION OF SUB PROBLEMS 


177776 CC=177776 
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$Z0kBH.P11 20-JAN-78 11:05 SEG CCl: 
baer eler=ti 
000001 R1i01=~1 
RSR=%e T= 
Reugepe1=-8000 
176040 RFWORDC T=-2000+40 
XxX=0. 
1 REPT 100 
_42 : TRAP ENTRANCE 
HAL T ; TRAPPED TO PREVIOUS LOCATION 
pbs LIST SEQ, ME 
3 14 "32. 
16 HALT FALSE TRACE TRAP 
Boonse erArL 
.=30 
390030 PRINT ;FOR HALT TRAPS 
: 5000 340 *HIGHEST PRIORITY 
i ate mae SCOPEC ;USER TRAP 
4 - =46 
16 000046 LOGICA ;RETURN TO MONITOR ADDRESS 
13 ooo0s2 040000 sEXECUTION TIME IS MEMORY SIZE DEPENDENT 
; ;(R6) I e at 
> ((R6)) PC LOCATION WHERE THE TRAP ORIGINATED 
: FOR T ON RUN ee H ALL SWITCHES DOWN 
;SR 1S=1 
M4 -SR 14=1 
;SR 13=1 UP-~ Rein OUT 
SR 1l2=1 OR RAPPING 
an 1821 OR cPROBLEN TERATION 
8 . 10=1 TEST 
-SR O3=1 OR 1 BROCESSOR CORE EXPANSION 
0 -SR O8=1 OR START ON 
: ;SPECIAL DELETE SWITCHES-SET RESPECTIVE SWITCH TO A 1 TO INHIBIT INT7<ATION OF DEVICE 
;SW O=1 INHIBIT TTY OUTPUT 
634 ;SW 1=1 INHIBIT TTY INPUT 
CEES 
: = 
5 ; =1 tha + LINE agtock 
+ SW S=] 1 INH BIT RC ; RK, RP DISKS 
; = 
p46 : ay $=} innieiT "p a3 --~ IF LINE PRINTER IS USED, MUST RESTART AT SO2 
41 - IF EAE EXIST It WILL BE AUTOMATICALLY SELECTED. 
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a ;PDP11 SIMULTANEOUS 1/0 
644 TTY INK :TTY IN INTERRUPT VECTOR 
by TYOUTR :TTY OUT INTERRUPT VECTOR 
HSRINR ;HSR INTERRUPT VECTOR 
HPOUTR ;HSP INTERRUPT VECTOR 
-=100 
LK3 ; INTERRUPT VECTOR LINE CLOCK 
300 sLEVEL SIX PRIORITY 
” PARSRV :MEMORY PARITY 
340 
-=174 
SRPTR: 177570 
SOF TSR 
.=200 
IMP aaSTART 
iR sRF11 DISK 
240 LEVEL S 
IRC -RC DISK 
240 
-=214 
7 FENDZ -DEC TAPE 
5 300 -LEVEL 6 
.=220 
74 IRK -RK DISK 
i . 
? .=254 
7 ef -RP DISK 
? 240 
STATUS=177776 
fase: zeae? 
TTCSR: 1 4 
TT ae 
oS 
ee 
ce ty 
= S6 
LK : |] YE, 
LPCSR: 1 14 
L : 177516 
: 177470 ;DISK ADDRESS AND ERROR 
RFDAR: 177466 -OISK ADDRESS REGISTER 
RFWC: 177462 : COUNT REGISTER 
, RFCAR: 177464 -CURRENT ADDRESS REGISTER 
RFCSR: 177460 -STATUS REGISTER 
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6 177% 
£38 
oC 1 

ae i>oaae 

7 177447 
177413 

7 +o 2 
17741 

7 177404 
1 

73 177 

71 177 

71 1 1 

71 177311 

714 177 

71 1 

71 1773i 

71 177314 

ot 177316 

? 

7 177340 

7 177 

7 177 

7 77 

5 O00 

7 

? 

7 

7 

? 

? 

? 

? 

7 

? 

7 

? 

? 

7 

74 

mh 

74 

744 003440 

we 

7’ 004440 
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RFCSRH: 177461 
RCDAR: 177442 
RCWC: 1774S 
RCBAR: 177452 
: 177%%6 
RCC : Ek mpg 
RKDAE: 177412 
177406 
RKBAR: 177410 
RKCSR: 177404 
RKCSRH: 17740S 
MOQ: 177304 
AC: 177302 
sc: 177310 
SRE : 177311 
MUL : 177306 
DIV: 177300 
NOR: 17731e 
LSH: 177314 
ASH: 177316 
-DECTAPE ADDRESSES 
tC=177340 
TCCM: TC+2 
TCST: TC 
TCOT: TO+10 
3 START 
TCWC: C+4 
TCBA: TC+6 
TCIV: “et 
Ae 1 eee 
: 1767 
: 176724 
| BBE 
: 1 Zi6 
Seen: 1767. 
SR: 176714 
RPCSRH: 176715 
Ste we) Oo 
- THIS TAME CHECKS THE READ DA 
-BY DOI CHECK SUM ON THE DAT 
tC1: MOV %1,-(6) 
MOV %3,-(6) 
CLR % 
MOV sTCRBUF ,%1 
TCe: a0 (1)4,%3 
(1)+,%3 
BEG TC2 
CMP %1, #TCRBUF +1000 
BHI 44 
HLT 
MOV (6)4+,%3 
MOV (6)4,%] 
RTS %7 


60e 














aa YT Ss CSF 
ig Raksteatt t 
:C GISTER 
+t ORC 
:HI 22 ADORE Ss 
70 

ee 

;STATUS GIS 

: HIGH 


SHER cee 
BY 


; SS OR CSR 
;ERE LOCATI 


;CONTROL AND FUNCTION 
;GENERAL STATUS 


{WIORD COUNT 

: CTOR 
; 1 DISK 
: ADDRESS 
; GISTE 

; GISTE 

: STER 

: RE S REGISTER 
: a ADDRESS OR CSR 
: COMMAND 

t FER TCl1 

;SAVE THESE ON THE STACK 
-SUM OF DATA 

‘ADDRESS OF READ BLIFFER 
sEVEN ADD 


;000 ADD -2’S COMPLIMENT 


-AT END OF BUFFER? 
:YES BRANCH 
;DATA ERROR 
:-RESTORE THE REGISTERS 


;EXIT 






MAIN. 
CZQKBH.Fil 


OOO472 012767 
ooosoc o0000ce 
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000240 


016526 


4742 
72 


1 

101 
177374 
177366 


017004 
177352 
177346 
177336 


177330 
177324 


Bo047e 


01%2S4 


177314 


177262 
OOS046 


177420 


177220 
000746 


015642 
177140 
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MOV 
RTI 


NOE RE : 


COe 


8240 , EAESRT 





v 
s 


;BRANCH AROUND ERE ROUTINE 
; JUMP OVER ERE SECTION 


Ree RY HERE PANE NE MAP Airer was ENABLED 


START: MOV 


48432 


ESTART: 


STARTe: 


aphe 
s ae 
TYPE 


JISRPTR 


es 
sSOF TSR, SRPTR 
(6)+,(6)4¢ 


ICOUNT 

Sant 
ART2, RETURN 

SCOPEF 

STATUS 


PREC AG 
ated» oR 


3100. Rt ROL 
R100, 3TRCSR 
R100, aTRCSR 
+4 


OPE 
ON T BUS LAST TOO LONG 
eBUEF » %6 


R100,aTTCSR 
R100, aTTCSR 
aTTCSR 


R100, 3TTCSR 
aTTcsr 


;SET POWER FAIL VECTOR 
:SET UP >18 x» 
TIME OUT VECTOR 


pee, ity Bate our 


MAROMBRE § CHT TCH RE REGISTER 
The Sul teh Pike BOINTER 


ssh POINT _T SWITCH REGISTER 
THe § 


: REST CTReK 

i REST TIME OUT VECTOR 
- MOV oF TO REGISTER 

SET ON POWER FAIL 


;A POWER FAIL OCCURRED 
;SET UP 


STACK 


; INTERRUPT ENABLE 
;RESET DID NOT CLEAR INTERRUPT ENABLE 


;SET UP STACK 

;SET A BIT 

:IS IT SET 

;RESET IS ON BUS TOO LONG 


;IF BUS HANG, CHECK NO SACK TIMEOUT 


; TEST FOR ERE 
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601882 


000015 
177214 
177176 
177170 
4 


a 
750ue 


177 
177022 
177114 


i77G1e 


000705 


176734 


11:05 Pace 


STl: 


STe: 


ST3: 


ST3A: 


ST4: 


STs: 


STSA: 


STé: 


it 


ines 


AAD eee eee 
44-44 HUN 4 


Ww 


— Lon) 
“W< 


WOO 
~~~ 
4~WD 


a8a32 


~ 
w 
~ 
wo 


DO0e 


; TRAP IF NONEXISTANT 


eRTIA,4 -SET UP FOR NON-EXISTANT 1/0 
sf Bata: i KAGE Bata" PBe Tr#"ReAcER on KE rBoRmC 
: 4 | L INT 
oT DaTAS ‘BRee BATE ERR Tzx PUNc 
DAT 4 :BASE DATA FOR HSP 
% 
= ;FOR READER STALL - HSR - 
#340, STATUS -LOCK OUT INTERRUPTS 
Rido, aTTCsR :TTY OUT 
; an 
R181 JTRCSR :TTY IN 
SHPCSR - TEST FOR OUT OF TAPE 
, a4 
sT3 
R100, JHPCSR - HSP 
QHRCSR ; TEST FOR OUT OF TAPE 
ST3A ;RESERVED FOR OVERLAYS 
: 1020 GTP OVER LAY 
: | GTP OVER LAY 
RSR, #10 
R100, DELAY -FOR STALL HSR 
R101. aHRCSR :HSR 
RSR, #20 
STS 
TIME 
R100, OL KCSA ;LINE CLOCK SO OR 60 CYCLES 
ere 
aSTSA.4 | 
@RPCSR -WAIT FOR CONTROLLER READY 
#15, JRPCSR :RESET DRIVE 


aRPCSR :WAIT FOR CONTROLLER READY 
:WAIT FOR ACCESS READY 
:CLR ATTENTION 


;WRITE CHECK/WRITE RF 


;TELL DISK TO READ OR WRITE 





: 
/R1C0 - TEST FOR DECTQPE 
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*2OKBM. P11 -J Li: 
866 i314 SNE ST? 
867 1316 002706 001370 MOV STCFIRST. TCEXPE 
1 0027 16 177054 MOV SFENDZ,. «ftCIv 
1 177032 MOV @R+IE4+RB+D0, aTCC™ 
3 1 ST?: TSTB RSR 
Ei ft wee 17eua2 mY iti. pon ¢ 
7 i 155 30 MOV al SOLPAT ty: ¥ FOR S aBt or LINE PATTER 
1 1 24 MOV LP6+4 CLINCT :LINE COUNT 
1 le MOV #40,C T 
1 1% 176702 MOV #14 OL POBR ;LINE FEED TO POSITION BUFFEF 
? i 1 000200 MOV PIiNTR. 38200 : INT T VECTOR 
141 o0020e MOV . : L 4 
14 MOV RI SR : IN T “F 
14 0iS572 ste: CLR % -NO “T" BIT FIRST PASS 
1 ; IF OPERATION WITH DIAGNOSTIC PACKAGE OR'ACT1LI 
0014 176410 TST 4 
9014 8A ;BRANCH IF NO MONITOR 
0014 1S42 176342 MOV @RTIA.4 
50 1 1 CLR aLPCSR NO LINE PRINTER WITH MONITOR 
501 i eth STTCER 1D EONSOLE TEST LuTTH MON? TOR 
001 boBsos 176355 CMPB #2, 4] :IS 3 REDE 
90 1 176652 ie JRKCSR ;YES DON’T TEST RK DISK 
3014 1 STsA: JSR “47, JBUSER ;FOR USER 1/0 PROGRAM 
9014 01 ISR %.7.DET1 : CHECK FOR CORE EXPANSION 
301 CLR 6 : FOR 
50 1 176270 MOV 86.4 ;FOR USER I70 PROGRAM 
001 4 176256 CLR STATUS ‘ALLOW INTERRUPTS 
50 1 MAINLINE: WAIT - WAIT HERE FOR INTERRUPTS 
0 1 176444 o02000 BIT JSRPTR, #2000 : INHIBIT PROCESSOR TEST 
001 BNE MAINLINE 
20 1 00270C IMP 
1540 REG1: 0 ;STATUS OF SELECTED DEVICES 
01s4e RTIA: RTI :AN RTI FOR NON EXISTANT I/O 
; TTY RECEIVER VALUES 0 TO 377 
901544 (05777 176510 TTYINR: TSTB JTRCSR :IS DONE SET 
10 O01 100401 BMI . +4 
1 301 1 HL T -FALSE RETURN FROM MAINLINE 
le OO1SSHY 1 176502 TSTB aTROR - TEST DATA FOR LEADER 
i3 O01 0014 3 BEQ TTYINe : IF LERDER GO BACK 
14 O01 ? 176474 o00026 CMPB @TROR, DATA! -NOT LEADER TEST FOR DATA 
1S 001 1401 BEQ TTYIN3 
16 O01 1 HLT ;DATA COMPARISON EPROR 
3) 901574 7 oo0016 TTYIN3: INCB DATAI : INCREMENT DATA 
18 O01 TTYINY: BNE TTYINe 
dee GBieie Bbees? 9ENG} C000 FIviNA: Hey Bt eTaL Beaten 
321 901614 oO0000e RTI :RETURN TO MAINLINE 
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176440 


$00842 


176416 


176410 
176402 
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176382 


806108 
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17&424 


000026 


000084 
176340 
176312 


000014 


176264 


i76244 
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-0S Pace is 

DATAL: xx :EXPECTED DRTG 

; TTY TRANSMITTER PRINT VALUES 0 70 377 

TyYOUTR: TSTB aTTCSR ; TEST FOR DONE 
at av Per ee INTERRUST RE CR? 
INCB DATRe iO NEREMEN Q r 

TYGUTIL: MOV DATA, aTTDBR : T TO DEVICE 
RTI : RET TO MAINLINE 

DATA2: xx : TRANSMITTED DATA 

MSR SECTION VALUES 0 TO 377 

HSRINR: TSTe SHRCSR :I1S DONE SET 
ie : FALSE TURN FROM MAINLINE 
ces” RENEE PP cedoee oot ebro 
CHPE SHRDBR , DATA3 : NOT CERBER TET COR DATA 

.* 

HLT DATA C ISON ERROR 
INCB DATAZ : INCREMENT DATA 

HSRINI: HOV ef rbaTag pata 

HSRIN2: INC JHRCSR + rae READER 
TI :RETURN TO MAINLINE 

DATAS: Xx : EXPECTED DATA 

:HS PUNCH TION, VALUES 0 TO 377 

: E READER ON FIX COUNT OF PUNCH ONLY (14 TIMES) 

: MOV TAY ; INIT TA 

HPOUTIL: nov SP TAY, JHPDBR : O DEVICE 

HPOUTR: TSTB JHPCSR : 
BMI - +4 ; 
HLT : RE TURN 
BIC DELAY JHRCSR : T ENABLE 
INC INTCNT :C 
CMP INTCNT, #14 : R ON? 
BNE T2 ;NO 
CLR INTCNT s YES 
BIS DELAY, JHRCSR : 

HPOUT2: INCB DARTAY - INC 
BEG HPOUT : AT R LIMIT START OVER 
BR HPOUT i “FIN REST OF DATA 

AY: xx 

INTCNT: O 

DELAY: O EQUAL 100 IF MSR RUNNING 

; TEST OF LINE CLOCK, INTERRUPT FOR SS SECONDS THEN STALL FOR S SECONDS. 

tKi: CLR ae : CLEAR LINE CLOCK TIMER 
BIS #100, aLKCSR 


GOe 
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3 OOGi00 177776 BIS #100,aeSTATUS 
359 Lee: RTI ;RETURN TO MAINLINE 
10S777 176230 LK3: Is76 aLkCSF : TEST FOR DONE 
at : ;SALSE INTERRUPT 
176216 BIC #200, aLKCSR 
40 LK4: INC aati : ON INTERUPTS ENTER HERE 
002140 CMP #3300. , dsTIME A LAPS OF SS ONDS 
Is LK : BRANCH IF TIME LESS THAN SS SECONDS 
100 176174 IC #100, @LKCSR 
35 Gordes |b02148 EAP tae00. eT IME ‘ORE MINUTE UP 
857536 SEO LK + OPE RESET TYMER 
105777 1761S2 ists SLKCSR ;NO-SKIP ON FLAG TILL IT IS. 
409375 000200 176142 te #200, @_KCSR -CLEARS THE FLAG 
9500751 BR LKY *sFOUND FLAG GO INCREMENT cCOUNTE 
000000 TIME: 0O 
: LINE PRINTER SHOULD RAISE PROCESSOR PRIORITY TO LEVEL OF LINE PRINTER 
- INTERRUPT VECTOR IS 200 
' oo02202 (Peo=LP5+4 
I 016767 OO0142 oOO0136 LPI: MOV SOLPAT , CURPAT ;START OF LINE TO CURREN 
I 016777 OOO0132 176126 LPe: MOV CURPAT: JLPDBR ‘CURRENT PATTERN TO LINE "PRINTER 
: 108777 176120 rsT8 JLPCSR’ 
i RTI : RETURN TO MAIN LINE 
: LPINTR: ISTB @LPCSR - TEST FOR FLAG 
.+ 
l HLT FALSE RETURN FROM MAIN LINE 
i 000117 LP6: CMP CLINCT, #79. TEST FOR END OF LINE 
101 CH Ennis ¥ VALUE FOR 132 COLUMN PRINTER 
101 BEQ LPY CR/LF 
101 INC CLINCT ay LINE POSITION COUNT 
10) 000137 CMP CURPAT, #137 ; TEST FOR MAXIMUM PATTERN 
1014 SEQ :YES - GO TO LP3 AND RESET 
101 INC CURPAT “NO - INCRE NT TO Next BTTERN 
101 BR :GO SEND O LINE 
10] oo0o0so LP3: MOV 540, CURPAT ; RESET PATTERN BHD BNO SENO 1S PRINTER 
1 ‘8 BR LPe’ : TO LINE PRINTE 
i LP4: CLR CLINCT >RESET LINE COUNT 
1 176032 MOV #i2, aLPDBR :LINE FEED 
: ; TSTB SLPCSR 
900137 cne SOLPAT, #137 :START OF LINE PATTERN 
: ENC SOLPAT ; INCREMENT START OF LINE 
; 000004 LPS; HOV #40, SOLPAT PRIRT START OF LINE 
i CURPAT: 0 : CHARACTER SEING PRINTED 
i SOLPAT: O Fi . bgM Ce CHARACTER 
1 CLINCT: O OST TION 
i ;RK1i DISK TEST INTERRUPT LEVEL S, 2000 WORD TRANSFERS 
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4 rT RK START: CLR INITIALIZE OISK - ORP-DeFr 

iQ3¢ pos3s0 16777 boese8 176014 Riki: mov CLCIMI? aanoor CORE BASE mene 

ba8982 15BB83 MOVE SRKHOROCT SAKE baie aS ITE CHECK TS OLS 

i 100200 175772 IRK: it #100200, 2RKCSR TP RRUPe VEE TDR Bofnte HE &E 

iO o80%es HLT -_ ;RK-11 ERROR FLAG UP OR READ. “OT Le 

{pve 000037 175750 IT 43 oR SRKDAE :OISK AT UPPER LIMIT? 

j BNE RKi NO 

ie ee — ee BNE axi’s ” 

104 002406 SWAB @SRKFUNCT ION : CHANGE COMMAND 

000743 BR RKSTART “RESTART NEW TRANSFER OF Orc 

1 oo0000 RKFUNCTION: fe) :DISK COMMAND 

i 1 1 176010 APSTART ROVER oe SOUTINE ;INITIALIZE DISK - DAR-DAE 

: 105777 reas “TSTB SRPCSR , 

1 O1 4 175772 RPI mov LLIMIT, JRPBAR ; INITIAL CORE ADORESS 

1 1 17 175762 MOV T, JRPWC :LENGTH OF TRANSFER 

1082 11 000432 175760 MOVB JeRPFUNCTION, JRPCSR {WRITE OR WRITE CHECK 10 DISK 

1388 100200 175750 IRP aif #100200, DRPCSR . ONT ERRUE vEe TSR POINTS MERE 
“ .* 

1 HLT ;RP11 READY NOT UP OR ERROR 

{Bee BR RPSTART 

1 000312 175716 CMPB 8312, aRPCA ;CYLINDER NO. 312, 624 FOR RPOS 

1064 BNE RPL oe . 

1065 000432 SWAB F) UNC TION : CHANGE COMMAND 

r BR RPSTART ‘RESTART NEW TRANSFER OF DISK 

1 -RC11 DI K SERVICE ROUT INE 

r C 175612 ACSTART: @RCDAR ; INITIALIZE DISK - DAR-DAE 

1 170 175610 RCe: NOV. Lut aire @RCBAR - CORE BASE 

i 76040 175800 MOV aRCuOROET LENGTH OF TRANSFER 

107 175576 MO JeRC THON: SRccsR >WRITE OR WRITE CHECK TO DISk 

107 RTI ‘RETURN TO MAINLI 

i 33 175570 100200 IRC: BIT ARCCSR, #100200 : INTERRUPT VECTOR POINTS HERE 

1 HLT : :RC11 READY NOT UP OR ERROR IS UP 

r RCSTART 

1 175S46 INC SRCDAR ;TO INCREASE XFER RATE 

' 38 002000 175540 CMP 0, IRCDAR ‘pean AT UPPER LIMIT, 4000=2, 6000=3, id 

1 002572 SEB a eRCEUNC TION : CHANGE COMMAND 

1 ae RCSTAR  RECTART. NEW TRANSFER OF DISK 

1 RCEUNCT ION: :DISK COMMAND 

r 1 DISK 

l 175520 bpstare: NCB @RFCSRH ; INITIALIZE DISK - DAR-DAE 

j 000040 i7sS50e2 AD JRF DAR I REASE DUTY CYCLE 

1 090 ze 175500 RFI: MOV iat JRF CAR :C 

l 176040 175470 MOV WORDCT, JRFWC LENT OF TRANSFER 

1088 002702 175466 MOVE SaREFUNCTION. JRFCSR WRITE OR WRITE CHECK TO DISk 

} 002 RTI ETURN TO MAINLINE 7OD 
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754 100200 IRF: BIT ORFCSR, #100200 ; INTERRU-T VECTOR POINTS ERE 
1090 Ba5582 7S te0 BGT “+6 | ies 
:09¢ HLT pontens ;RF1l READY NOT UP OR ERROF UP 
j 

094 175434 ADD #40 DAR : INCREA Ty crc 

igs ratifies 175424 cMPe 43, SRFDAE D1Sk At UPPER iar 722, i7s4, 3726 
: 178420 174000 cre SRF DAR, #174000 :AS FAR ON DISK AS WE CAN GO 
j 74S : 

0027 SWAB @BRFFUNCTION :C C 

i - BR PFSTART “RESTART NEW TRANSFER OF DIc+ 
il RFFUNCTION: -DISK C 

ik LLIMIT: BEGIN ;FIRST CORE ADDRESS OF TRANSFES 
110! raetegtt WO=14 ‘WRITE DATA 

3 RB=2 

11 BR=2 ;READ BLOCK 

13 F=0 ;FOR | 

13 1E=S00 : INTERRUPT E E AND UNIT - UNIT #1 
ihk 1 =] ;DO0 - THE FUNCTION 

: : ; é 004000 R=4900 ; REVERSE 

Lh) 7 TCFIRST: ;FIRST BLOCK TO BE SEARCHED FOR 

1114 508 rete TCLAST: $77 -LAST BLOCK TO BE SEARCHED FOR 

Lil 712 BLK: :C NT BLOCK 
bid 14 TCEXPE: O - THE BLOCK THAT IS EXPECTED 
lil -GO TO FORWARD END ZONE 
il 0027 16 175462 FENDZ: MOV SFENDZ,aTCIV ;END ZONE VECTOR SETUP 

1} 175444 TST JTCST ; TEST FOR END ZONE 
Ll BMI FENDI -AT END ZONE? 
Li 175434 INCB aTCCm :SET DO - NO DELAY 
it 70 175440 FENDI: mov eTCF1. aTCIV VES - NeW vectOm 
11 104000 175416 " gic #104000, STCCM CE aRcH OCK FOWARD 
ti l 177732 MOV TCFIRST, TCEXPE :COUNT WHEN THIS BLOCK IS FOUND 
el 175404 TCF1A: INCB aTCCM -SET DO 

11 RTI RETURN ON NEXT BLOCK 
+ 100200 175374 TCFI: BIT #100200, 3TCCM -ANY ERROR ON READ? 

1} HL T . ;TC ERROR SET - FORWARD READ BLOC: 

11 175370 177704 CMP JTCOT, TCEXPE :IS THIS OUR BLOCK FOR SYNC 

Ll! BLT TCFIA ;NO-READ SOME MORE BLOCKS 

il BEQ TCFe he 

it HLT -WE PASSED THE BLOCK 

li 012777 003032 175362 <tTCF2: mov eTCF3,aTCIV ; VECTOR FOR SEQUENTIAL READS 

Ll 77 175342 INCB aTCcM -SET DO 

iis RTI RETURN AND TEST SEQENTIAL BLOCKS 
114 -FIND SEQUENTIAL BLOCK AT FOWARD DIRECTION 

tise ale 3 938777 100200 175332 tcF3: BIT #100200, aTCCM - TEST ERROR AND READY 

_* 
1144 66 : 104000 HL T ;FALSE INTERRUPT ON TC-1! 
1145 003044 027767 175326 177636 CMP ITCDT, TCLAST HAVE WE TESTED ALL BLOCKS 
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is 1G 414 

il4 ? 177634 

1148 ‘767 175312 i77626 

ee: 1 

i184 

ite 17Se7 

Ht — 

il 

11 OY 012777 003104 175274 

11 , 4 Te 177S72) =177574 

tf ' 17SeS0 

if 1 1 175240 

1 0 

HES Oostgs 003232 178e36 

1 68 50 

I 

116 

i e8 26 
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175104 


CO3304 
175070 
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XFENDZ: BR 
; MOVE hy TO REVERSE END ZONE 


REND2: 


REND1: 


TST 


RTI 
MOV 
ey 


JO0e 


RENDZ 
TCEXPE 
Oran ° TCEMPE 


TCWBK 
aJTCUM 


FENDZ 
BRENOZ,aTCIV 
TCLAST, TCEXPE 
aTCsT 

ND1 
aTCCm 
#R+IE+RB+00, ATCC 
STCRI,agTCIV 





TS CURRENT BLOCK CORREE? 
;FAILED IN FOWARD READ TO FIND NEX™ BLOce 
THIS ROUTING URTTES a Goons 


; INDIRECT TINK 


‘ EN? ZONE VECTOR SETUP 


ie 


;SET UP FOR REVERSE SEARCH 


ive set “aoe TO TURN UNIT AROUND 


UNE? dos TIL 


REVERSE AND GO 
sit UP UP NEL INT 


AB BLOCK 
RRUPT VECTOR 


RTI 
;WRITE FORWARD ALL BLOCKS EXCEPT O 


TCWBK: 


TCWBI1: 


TCRI: 


TCRIA: 


TCRe: 


MOV 
MOV 
MOV 


a5 % 


we 


DH 
B5SnS 
oo o 


eT CHB 
aTc CBA 
SIEtHO+DD. aTCCM 


on 
. +4 


TCIV 
cK 


aTCF3,aTCIV 
#IE+RB, aTccm 


#100200, aTCCM 
. +4 


JTCOT, TCEXPE 
TCRe 

TCRiA 

RENDZ 

aTcem 
STCR3,aTCIV 
aTCCmM 


; INTERRUPT VECTOR FOR WRITE 


UAT TE ye ADDRESS 


“ 
RETURN one BLOCK IS WRITTEN 


; SEARCH ma oeK VECTOR 
ts in THEN NEXT BLOCK 


; TEST FOR ERROR AND READY 


’ 
. 
. 
« 
' 
° 
, 
2 
s 
» 
. 
; 


DECT 7 OUR PIR ON READ BLOCK REVERSE 
Is IT FIRST pugs 
-YES - wie ue T PASSED T 
-NO - D THE BLOCK 
WE ces OUR BLOCK 
GO TO END 2 AND TRY AGAIN 
SET DO 
F ten FIRST 


NTERRUPT TO Pst ALL BLOCKS 


;WAIT FOR NEXT BLOCK TO INTERRUPT 
:FIND SEQUENTIAL BLOCK IN REVERSE DIRECTION 
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195 304 777 100200 175060 TCR3: BIT 
tae 5833:2 38500; : BGT 
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439° OC33i% 1040060 HLT ;ESROR PERCING SESGUENTIGO“N GLole I BE VERSE 
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r. x7 7082 GR GEIRGT.STCOT. 1048 HF SS PAHS pe crc 
1503 136096 177354 CHE = ATCDT, TCExPE STEST SEGQUENTAIL BLOCK IN REVERSE 
1505 y rer :TEST d REOVENE Radar ab? BLOCK IN REVERSE FAILEC 
150 _— a Tite ter & meu euece 

4° 

0 30: 01 77 l2 175024 + Rak: - Fae oTSeT soe ee VECTOR 

16 003 ae 1 175012 ny on ; 

i3 503 i eg aB8e08 ie ISR sis em " i CHECK Whe BUFFER 

14 ¢ RTI EXIT = RETURN WHEN BLOCK IS REAC 

i 174754 TORI: TST argon 

br a eee fe Sam NG el I a 

743 , BR SRETURN 10 BLOCK SCORCH 


anaes ~haekar 


en  -  e e e  e e 
at + 


| 
ie 
iS 
| 
| 








DosN7e 


003474 
003476 





- THIS WRITE BUFFER LOOK THE SAME FORWARD OR REVERSE 
TCWBUF : 


TCRBUF : 


N=1 
. REPT 


100 


; DECTAPE 


; DECTAPE 
; DEC TAPE 
; DEC TAPE 
; DECTAPE 
; DEC TAPE 
; DECTAPE 
; DEC TAPE 


; DECTAPE 


READ/WRITE BUFFER 


READ/WRITE BUFFER 


READ/WRITE BUFFER 
READ/WRITE BUFFER 
READ/WRITE BUFFER 
READ/WRITE BUFFER 
READ/WRITE BUFFER 
READ/WRITE BUFFER 


READ/WRITE BUFFER 


NOe 
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11 N=Nel1 
SS 00350C i N .DECTAPE READ/WRITE BUFFER 
+ sere. Py 
+ N=N+] 
5 No ;DECTAPE READ/WRITE BUFFER 
8 . N=N¢] 
> ‘. ;DECTAPE READ/WRITE BUFFER 
] N=N41 
4 N ;DECTAPE READ/WRITE BUFFER 
43 —N 
+ N=N+1 
rt .. ;DECTAPE READ/WRITE BUFFER 
44) al 
4 =N+i 
A Ht ;DECTAPE READ/WRITE BUFFER 
td N=N+1 
3 “he ;DECTAPE READ/WRITE BUFFER 
th N=N+1 
;DECTAPE READ/WRITE BUFFER 
{4 N=N+1 
£9, A ;DECTAPE READ/WRITE BUFFER 
8 | N=N¢]1 
+ ‘ -DECTAPE READ/WRITE BUFFER 
] N=N+ 1 
8 i. ;DECTAPE READ/WRITE BUFFER 
4 N=N¢1 
1° oes ;DECTAPE READ/WRITE BUFFER 
® N=N+1 
‘ -DECTAPE READ/WRITE BUFFER 
k N=N+1 
; 3 ;DECTAPE READ/WRITE BUFFER 
; ~ 
4 N=N+]1 
t ‘ ;DECTAPE READ/WRITE BUFFER 
9° N=N+] 
01 ;DECTAPE READ/WRITE BUFFER 
| aa 
AS N=N¢]1 
0. 2 ;DECTAPE READ/WRITE BUFFER 
te N=N+1 
iC N ;DECTAPE READ/WRITE BUFFER 
| a 
18) 





;DECTAPE READ/WRITE BUFFER 


B03 


ee 
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i 10 003612 177745 - 

! tg 0036 14 i :DECTAPE READ/WRITE BUFFER 

i 14 ms nano. 

; 18 4 +. ;DECTAPE READ/WRITE BUFFER 

i i 903684 - astts DECTAPE READ/WRITE BUFFER 
-N . 

' oC N=N4+] 

t 0036 3¢ 2 No ;DECTAPE READ/WRITE BUFFER 

HEE onze BR ~ CECTAPE RERD/ARITE SUFFER 

i 3 pea ONG! 

132: N- -DECTAPE READ/WRITE BUFFER 

132 Boseus 37 io 

133¢ O02bu4 § Ne ;DECTAPE READ/WRITE BUFFER 

1 F 7 N=N¢]1 

1333 O0365C N ;DECTAPE READ/WRITE BUFFER 

l te sak 4+ -N 

i 3! N=N4] 

i 13 a NT :DECTAPE READ/WRITE BUFFER 

1 3 =N+1 

138 N ;DECTAPE READ/WRITE BUFFER 
=N4] 

i NT :DECTAPE READ/WRITE BUFFER 

1 N=N¢1 

t 4 ? N ;DECTAPE READ/WRITE BUFFER 

l N=N¢] 

' 4! a ;DECTAPE READ/WRITE BUFFER 

1350 N=Ne1 

iz N ;DECTAPE READ/WRITE BUFFER 

13 N=N+1 

ieee N -DECTAPE READ/WRITE BUFFER 

13 N=N+ 1} 

3 Ne ;DECTAPE READ/WRITE BUFFER 

l 5 N=N4]1 

if: : No -DECTAPE READ/WRITE BUFFER 

tg > ; DECTAPE READ/WRITE BUFFER 

14 - / 
1364 Bo a8e ~ ‘ 
1365 N=N+¢j 








MAIN. 





MACYi1 30811052) 20-JAaAN-78 


CZUKBH.F1i 


1369 
1368 


PERSE 


aN 


Be ne ne be bn be Be ee ee ne Be Be ee 


1 
i 
| 
1 
l 
1 
1 
l 
1 
1 
1 
1 
1 
1 
| 
1 
1 
i 
1 
i 
1 


S£tit£is£is 





003786 


s 


| 
palais's Ti 


nes 


: 


ales NN 
-O00e-N 


NN 
fu 


es 


S60-~ 


B85 


Nee 





20-JAN-78 11:05 


11:05 PRce 28 


; DEC TAPE 
; DEC TAPE 
; DEC TAPE 
; DECTAPE 
; DECTAPE 
; DEC TAPE 
; DEC TAPE 
; DEC TAPE 
; DEC TAPE 
; DECTAPE 
; DEC TAPE 
; DEC TAPE 
; DEC TAPE 
; DEC TAPE 
; DEC TAPE 
; DECTAPE 
; DEC TAPE 
; DEC TAPE 


; DECTAPE 


READ WRITE BUFFER 


READ- WRITE BUFFER 


READ/WRITE BUFFER 


READ/WRITE BUFFER 


READ/WRITE BUFFER 


READ/WRITE BUFFE.. 


READ/WRITE 


READ/WRITE 


READ/WRITE 


READ/WRITE 


READ/WRITE 


READ/WRITE 


RERO/WRITE 


READ /WRITE 


READ /WRITE 


READ/WRITE 


READ/ WRITE 


READ “WRITE 


READ ‘WRITE 


BUFFER 


BUFFER 


BUFFER 


BUFFER 


BUFFER 


BUFFER 


BUFFER 


BUFFER 


BUFFER 


BUFFER 


BUFFER 


BUFFER 


BUFFER 





DO3 
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°Z2QkKBH.F1i  20-JAN-76 11:05 ==% 0029 
i 90010; N=eNel 
; 000100 REPT 100 
hs N=NM-] 
i42e N ;DEC TAPE READ WRITE SUFFER 
14 00 N=N-] 
i429 904040 990400 -N 
14 a079 wale ;DEC TAPE REAO-WRITE BUFFER 
432 004044 177701 -N 
433 OO4046 000077 N ;DEC TAPE READ/WRITE BUFFER 


= -- ee 


“4 090078 =N-1 

436 bodbeS ADDOSE “e 

i4 N ;DEC TAPE READ/WRITE BUFFER 
pe - 

1439 Soubee 92 N ;DEC TAPE READ/WRITE BUFFER 
HS? oowoe 9953 

14 004062 000074 N ;DEC TAPE READ/WRITE SUFFER 
tqad u T7708 Pie 

-N 

144s Souoee 900073 Ny ; :DEC TAPE READ/WRITE BUFFER 
ia? 90407 177706 -N 
144g 7 2 N :DEC TAPE READ/WRITE BUFFER 
23 gouory 9009Es 7 
14 004076 o80075 a -DEC TAPE READ/WRITE BUFFER 
1453 004100 177710 -N 
1464 00410e C ss :DEC TAPE READ/WRITE BUFFER 
1 41 11 -N 
14527 6041 Be 600067 N , :DEC TAPE READ/WRITE BUFFER 
1459 004119 eat -N 
13g? 4112 a. ;DEC TAPE READ/WRITE BUFFER 
1462 004114 177713 =-N 
Re 004116 uae SF :DEC TAPE RERO/WRITE BUFFER 
14 4) 14 < 3 

14 Boise 64 ;DEC TAPE READ/WRITE BUFFER 
1468 gouiey Povope NS 

ives 4} bao0e3 N :DEC TAPE READ/WRITE BUFFER 
1471 OO4130 177716 -N 

147@ 004132 2 ;DEC TAPE READ/WRITE BUFFER 
1474 9041 77717 a 

1476 Bout 6 b0008 | N :DEC TAPE READ/WRITE BUFFER 
1477? OO4!IMO 177729 - hi 








EOS 


MAIN. velba wt 20-JAN-"B 11:05 Face 30 
-Pli -J 1:05 





*20xBH AN-75 3 
i478 oo414e2 2088? a ;DEC TAPE READ- WRITE BUFFER 
a — 
i4 44 ‘ = 
i581 bovi4e po00E? N :DEC TAPE RE@D/WRITE BUFFER 
i4 =N-1 
4 -N 
pe 138 ae ra. :DEC TAPE READ WRITE BUFFER 
1 =N- 

-N 
ch Souize peaeee N ;DEC TAPE READ/WRITE SUFFER 
| =N- 
4 4 -N 
i3 B55 te8 AO00E4 Ne ;DEC TAPE READ/WRITE BUFFER 
14 =N- 
* | -N 
‘ Sou ibe re N ' ;DEC TAPE READ/WRITE BUFF _R 
i 0041 26 -N 
ey bod se soaeee “te ;DEC TAPE READ/WRITE BUFFER 
14 004174 v4 -N 
14 176 1 N , :DEC TAPE READ/WRITE BUFFER 
1 -N 
pousos G Ne ;DEC TAPE READ/WRITE BUFFER 
1 31 -N 
: bo4sbe ra Ne :DEC TAPE READ/WRITE BUFFER 
i 1 32 -N 
pousi8 2 a ;DEC TAPE READ/WRITE BUFFER 
1510 214 177733 -N 
ts 216 ooo N ;DEC TAPE READ/WRITE BUFFER 
1513 004 34 -N 
: ie BoussS po004 " "es ;DEC TAPE READ/WRITE BUFFER 
= = 
151 ats “ 
1? So4sSe : Bea :DEC TAPE READ/WRITE BUFFER 
1 g dove 177736 -N 
0 O04e e803; N ;DEC TAPE READ/WRITE BUFFER 
1 : y 3 -N 
: pousae ral N ; ;DEC TAPE READ/WRITE BUFFER 
l 7774 =N 
Sousue ee . , :DEC TAPE READ/WRITE BUFFER 
} y 774 a 
Bousue Sopa N :DEC TAPE READ/WRITE BUFFER 
1531 204250 Ge -N 
1 : n04e5 00036 , :DEC TAPE READ/WRITE BUFFER 
] 000035 N=N-! 





FOS 


MAIN. 1-73 13:05 PAGE 31 
*ZOKBH. P11 
+232 No ;DEC TAPE READ WRITE BuFFER 
1228 N=M- 
12 -N " 
r " ;DEC TAPE READ WRITE BUFFER 
is N=N-] 
1540 -N | 
is4 N :DEC TAPE READ-WRITE BUFFER 
ies - 
1544 N ;DEC TAPE READ/WRITE BUFFER 
; > ~ lla 
154 N ;DEC TAPE READ/WRITE BUFFER 
: =_* 
15S¢ N :DEC TAPE READ WRITE BUFFER 
‘i ll 
16 N :DEC TAPE READ/WRITE BUFFER 
1SS4 ers 
56 N :DEC TAPE READ/WRITE BUFFER 
-_ 
355 = ;DEC TAPE READ/WRITE BUFFER 
2 ‘ =N= 
; -N 
z: N ;DEC TAPE READ/WRITE BUFFER 
26 3 NN 1 
36! N ;DEC TAPE READ/WRITE SUFFER 
N=N-1 
>t -N 
ot N ;DEC TAPE READ/WRITE BUFFER 
; N=N-] 


wt 


N ;DEC TAPE READ/WRITE BUFFER 





REAC/WRITE BUFFER 


p~ Noulsone 
#8 93 
# 22 
2i*2 
7 
: 


et oe Be 0 ee es ee ee * b&b b= © = Bb bs & e 


1 ;DEC TAPE READ/WRITE BUFFER 
] - “ile 
i Bou ses s8i8 ce ;DEC TAPE READ/WRITE BUFFER 
4 3 -N 
38- pousee moe N mS ;DEC TAPE READ/WRITE BUFFER 
qj 64 — 
4 Bouses oe i ; ;DEC TAPE READ/WRITE BUFFER 
] 364 177765 -N 
3 43bE 0013 7 ;DEC TAPE READ “WRITE BUFFER 





A = _—_——_— — 








GO3 
“RIN MOBCYi1 3O8:10S2! .20-7HN-"S 1::05 Pace 32 
(2 Gk Br. Fi i 2O-JAN-7B 1::05 
MoM! 
1247 ows70 T9998E “N 
iS39e@ 004372 d000ie2e " ;DEC TAPE READ WRITE BUFFER 
: aalt age 
86436 Ao00 x" 
Hf, N ais ;DEC TAPE READ WRITE BUFFER 
%~=N- 


;DEC TAPE READ/WRITE BUFFER 


gy 


& 
3 
: 


ip 


;CEC TAPE READ/WRITE GUFFER 


N ;DEC TAPE READ/WRITE SUFFER 


> &- &- &- ®. &. 


BBeRR TERS 
: 


N ;DEC TAPE READ/WRITE BUFFER 


 & be 


READ/WRITE BUFFER 


;DEC TAPE READ/WRITE BUFFER 


ee: 
? 
Shi 
ee 
R 
: 


COOrrrnr 


;DEC TAPE READ/WRITE BUFFER 


-- &- b&b 
o- &- bb op 


;DEC TAPE READ/WRITE BUFFER 
OOWH4O 012020 BEGIN: MOY,  sBEGIN, RETURN :FOR SCOPING 
004000 016462 MOV #4000, 981 COUNT ; ITERATION COUNT 

: TEST COMPARE INSTRUCTION INDEXED 


7 7777 #-10,~0 ;MINUS 10 TO REG O 
ae bi65) i2S52Se cree A‘), alesese OO TRADES BY MINUS 10) TO #le2sSe252 
+ 
47 HL . 


Aas 
ee: 
or 


; COMPARE WITH INDEX FAILED 


UREN) 
292 
aE = 
on 
goer 


os 


1 
ORs) l25eS2 O16710 cmp eleseSe,a:0) ;A INDEXED 
oe i ; COMPARE FAILED DESTINATION INDE® 
:SET “ISR™ FOR DISKS AND KWIIL TO CURRENT BANK 
107 MOV %F % :C NT BANK 
? 7777 BIC 8007777, “0 ;LEAVE ONLY BANK BITS 


44 K3, % ;ADD_IN CLOCK ENTRANCE 
100 ROY 20 Shido ;LINE CLOCK, KWLIL 
SIRF xO" 


Eee oe A ie 
Vv % Db204 ;RFil ISR 
ei BSB BRZE a 


000210 MOV “0, a8210 SRCLI1, ISR 


tet SE gR UE OUN OE 


4£iiz£ 
a 


i 
1 
1 
1 
i 
1 
1 
1 
1 
! 
i 
i 
I 
1 
i 


SOOO OST KT” 


oO 
Oo 
ab 
uw 
wm 
£ 
Oo 
o- 
oO 
oO 








MBIN. “MHCYil 308.10SE) 20-JAN-"S 11:05 aGE 23 
coe BH. FP 1li 20-JAN-78 11:05 





eu 0 
+ pat ReSSRR 4 og 4 0 
1648 004570 010037 oO00220 MOV “0 Ja22c :Qel1 ISR 
164 74 ; Bis i “0 
bee 0 Hac 007957 BIc zn ates “0 wiediees 
lo i 
m art fe) 
‘bed 93709 ney sai tart :CHANGE DISK NPR BUFFER 
1655 004624 042700 007777 BIC po OR “0 
ieeS BadeSo BREGRE 947004 B90 BRUFE , 0 <n 
Vv 0, %6 sCHANGE STACY TO EXISTING Bary 
j 
1659 GO4%636 012700 ocfD0I0 MOV #10.%0 : INDEX 
1 rome 016710 oS2sSes5 CMe A(O}, soseses 
{ ih ; ; COMPARE FRILEL 
1663 004654 104400 SCOPE 
;REGISTER O CONTAINS OOCCIOC 
ibe BOWb5E 2760 OS2S525 9016710 CMP #0S2525,A(0) 
4 1401 BEG .+4 
1666 OO4666 104000 HiT : COMPARE FAILED 
ip 004670 104400 SCOPE 
3 ;REGISTER © CONTAINS OOOCI1O 
7 904672 O26060 016710 916710 CMP A‘0),ACO) 
toon Rone rattch at a COMPARE FAILED 
Ee BRdSRG Bdg8e SCOPE - 
16 004706 012700 i77770 MOV #-10,%0 
167 ? 6 016710 016710 CMP ACD), ACO) 
i ? 47 14 BEO +4 
7 40 HLT ; COMPARE FAILED 
1681 004724 104400 SCOPE 
1683 ;REGISTER O CONTAINS 177770 (-10) 
16 004726 012701 oog0004 MOV +4 %1 
1685 0047 32 606 016710 06167:0 CMP Ao}, Ach) 
Hees Beir2 Bis er? LcOnpRRE FAILED 
16 4744 104400 SCOPE 
l 746 61 016710 016710 CMP AC1), ACO) 
i nta-hy 1401 BEO +4 
? 0 HLT : COMPARE FAILED 
1633 004760 104400 SCOPE 
4 700 177774 MOV #-4.%0 
tege Baise BIER honors ORAL, 
1698 OO0S5000 001401 BEQ : 
+8 3 atattetone 1080 HLT -CMP FAILED 
4 44 SCOPE 
i701 sREGISTER O CONTAINS 177774 (-4) 





I03 


-MRIN. MACYi1 3ORi1 + 


20-JAN-"8 11:05 PAGE 3% 
-cQOkKBH.P ii 20-JAN-> i: 


ii:05 
sREGISTERP 1 CONTAINS O000:2 





i? 
i793 $006 G26160 O1b710 Cie710 cre ac 1) 80) 

170s 194000 OPE > COMPARE FRILED 
1 4 

1707 : TEST MOVE ODD BYTE TO REGISTER 

1708 ;PROBLEM 1150237-7-1iaR-72 

1? 2@ 116700 911677 MOVB C+2,«0 

1710 ace? 0c003s CMP a3S5.%0 

i2i2 i 4000 ALT “ 

3} iugoe SCOPE | 

£4 b >: TEST MOVE INSTRUCTION FOR INDEX 

est 40 012700 177770 MOV #-10,«0 

1717 016067 016710 O11660 MOV Aa‘O): TEMP 

1216 926727 O11654 i2e52e5e2 CMP TEMP: sl2eS2S52 

17 1401 BEG . +4 

i? 1 Mt T : COMPARE FAILED 
1? é 1044 SCOPE 

17 0127 000010 MOV #+10,%0 

1? 160e7 916710 011632 MOV A‘O), TEMP 

1? i 0116 052525 CMP TEMP: s0S2S25 

17 106 091 1 BEQ +4 

17 110 | HLT :MOV FAILED 
1? liz 1 SCOPE 

17 11% 012700 177770 MOV #-10,%0 

17 51 e7 125252 016732 MOV #125252, TEMP (O) 

1? 1 016722 125252 CMP asc, #125252 

17 1 1401 BEQ . +4 

17 1 1 HLT -MOV FAILED 
12 140 1044 SCOPE 

17 142 012700 o00010 MOV #+10,%0 

17 146 0187 OS2525 016732 MOV #052525. TEMP(0) 

1233 154 s78 016742 O5e525 CMP daTEMP+10, sOSeses 

1741 125 1 HLT ¥ >MOV FAILED 
12ue 166 104400 SCOPE 

1744 ;TEST BIC INSTRUCTION FOR INDEXING 

174 170 012767 177777 011534 MOV #-1. TEMP 

1? 176 012700 177770 MOV #-10,%0 

174 O46067 016710 011522 BIC Aa(O): TEMP 

i793 1 g26727 011516 OSe5e5 CNP TEMP, wOSese2s 

17 l HLT : BIC FAILED 
i Bee sb bee 

1? 12767 177777 O11S500 MOV #-1, TEMP 

1754 52 015700 000010 MOV #10/%0 

3 4 O2eee> Bi ieee ees ais Oe 

17S ese 00140! BEG a 








oe 
i 


INAS 
mt NNN 
SSSR RARE 4 









NSNNNINNN 





ob bb bb be be be be pe 


-— bb bb 
NNNNNNNNN 


NA fa 


NNNVN 





BSS 33 


xt 


w ae +4 = . 


wt ODE 






> 
> 





--)-o- © &— © = © b= b= & 8 8 be 8 2 be 





--e-e-e—- 
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Pili 20-JAN 





_— 
tro 
a 
ppsggee 
ttv- 
fost NN 
W 
N 
O~ 
a | 
on 
NN 
«tn 
atlas) 








011230 


177777 


01673e 


o00 
o0eNnN 


916742 


016732 
9S2Se2e5 


011354 
911342 


016732 
016742 


011300 
011266 


016732 
016722 


016732 


JO3 


~ er “el 11:05 PAGE 35 


HiT 
SCOPE 
MOV #-1, JeTEMP4+10 
MOV #10,%«0 
BIC #125252, 1EMP<O) 
CMP OeTEMP+!10, aSeSes 
BEO . +4 
HLT 
SCOPE 
MOV #-10.%0 
MOV s-1, TEMP-10 
BIC a 2S, TEMP-10 
CMP TEMP-10, #l252Se 
BEQ +4 
a5 

; TEST SUBTRACT INSTRUCTION FOR INDEXING 
MOV #leSeSe,T 
MOV #-10, 
SUB A‘O); TEMP 
BEG au 
HLT 
SCOPE 
MOV #125252, dsTEMP 
MOV #-10.% 
SUB 8, TEMP+10(0) 
BEG +4 
HLT 
SCOPE 
MOV s0S2S25, TEMP 
MOV #10,%0 
SUB ACOs, TEMP 
BEQ +4 
HLT 
SCOPE 
MOV #052525 , daTEMP 
MOV #1 %0 
SUB A+10,C°O) 
BEG +4 
HLT 
sc 

: TEST UNARYS INDEXED 
MOV 8-1, a8TEMP 
MOV #-16,%0 
CLR 0<0) 
TST as TEMP 
BEQ 44 
HLT 
SCOPE 


;BIC FAILED 


;BIC FRILED 


;BIC FAILEO 


;SUB FAILED 


;SUB FAILED 


;SUB FAILED 


;SUB FAILED 


;CLR FAILED 





ob eb ee Zz 
OOnNOUM se ¢: 





016732 


77777 
0010 
016722 
016732 


000001 


2O-JAN-"SB 11:05 PAGE 3 
:05 


0i 5732 


016732 


016732 


016732 


016732 


016732 


016732 


016732 


KOS 


8-1, aaTEmMe 
#+10,~0 
C(Q) 
aaeTEmMP 

+4 


#-1,aaTEMP 
#-10,%0 
0(0) 
asTEMP 

+4 


#-1,a8TEMP 
#10,~0 


(0) 
aa TEMP 
+4 


#-1, aaTEMP 
a-16,%0 
DO) 
aaeTEMP 

. +4 


a#-1. asTEMP 
#+10,%0 
C(O) 
aaTEMP 

. +4 


#1, aSTEMP 
s-10,~0 
D(O) 

ae TEMP 
+4 


#1,aaTEMP 
#10, %0 


on gs) 
aeTEMP 
. +4 


#1, daTEMP 





FAILED 


FAILED 


FAILED 


FAILED 


FAILED 


FAILED 


FATLED 


‘ 
rm 


LE Eee 









MAIN. MACYI1 30A(10S2) 20-JAN-78 11:05 PAGE 37 i 
-ZOKBH.P11 20-JAN-78 11:05 Ew VUOCSs7 

1870 MOV 8-40, %0 
1871 i 5 349 NEG 010) 
1872 a 58535 016732 CMP 8-1, ceTEMP 
1873 1 BEG .+4 
187% 1 HLT -NEG FRILEL 
1875 1 SCOPE 
1876 
1877 1 1 016732 MOV #1. aeTEMP 
Hes Ree Sheree a 
1880 022737 177777 016732 CMP 8-1, daTEMP 
i 90605 14 BEQ +4 
1 i HLT :NEG FAILED 
i 5066 1 SCOPE 
1 012737 177777 0167232 MOV #-1, aaTEMP 
! 2 177770 MOV 8-10, «0 
1 1 016742 ADC D(0) 
l 1 016732 TST aa TEMP 
1 119 i BEQ +4 
1 lie 1 HLT sADC FAILED 
114 1 SCOPE 
l 116 012737 177777 016732 MOV 8-1, aaTEMP 
1 1 700 O00010 MOV #+10,%0 
i i SEC 
i i 016722 ADC C(O) 
1 16732 TST ae TEMP 
1 14 1401 BEQ +4 
1 144 | HLT -ADC FAILED 
i 14% 1 SCOPE 
1 150 012737 000001 016732 MOV #1. d8TEMP 
1 156 0 177770 MOV s-10,%0 
i ies 016742 C D(O) 

1 16732 ST aaeTEMP 
1 174 1401 BEQ +44 
l 7% 1 HLT :SBC FAILED 
i } 1044 SCOPE 
1 2 12737 000001 016732 MOV #1. aeTEMP 
191 1 00 oO00010 MOV #+10,%0 
igi¢ ie : 16722 ee C(O) 
ig 38 ptesgs fey stem 
1 1 4006 aCe oak SBC FAILED 
39 iBugoe SCOPE 

: TEST JMP INDIRECT 

t 30 830708 MOV 47 .%0 
38 962700 o0010 ADD #10, 70 
\ leg Mf ad ee HLT ? -IMP FAILED 





MO3 


-MAIN. MACYi1 308(10S2) 20-JAN-76 11:05 PAGE 36 te rien 





CZQKBH.P 11 20-JAN-78 11:05 EG OC36 
BeeS28 PBR6dE Sore 
010600 MOV %~6,%0 
010001 MOV %O,%i 


0 MOV “4° 4S 
_ 
? . ;MOV REGISTOR FAILED 





Bs 

| 

3 

1934 

1 

15 : 

l 104400 SCOPE 

1386 : TEST INDIRECT SFR 

1 ; TEST I ! ON 

1941 023727 016700 1252S52 CMP srauct S2 

{ § 194000 ik = CMP FAILED 
i CE OPE ’ 

1 2737 125252 016700 CMP #125252, 398 

i 1401 BEQ +4 

i 1 HLT -CMP FRILED 
i 1 SCOPE 

1 3737 016700 016700 CMP aa8,asB 

| 1 BEQ +4 

; 1 HLT :CMP FAILED 
4 1 SCOPE 

1 ; TEST MOVE INSTRUCTIONS 

1 7 016700 MOV S %0 

1958 543206 ioeoee CMP o1eéeee. x0 





NOS 












.MAIN. MACYLI 308 1052) 20-JAN-78 11:05 PAGE 39 
CZQKBH.P11 20-JAN-78 11:05 ceG 0 
19S 1 BEG +4 
1353 8698 TBlcgs ere nov Fates 
iss 1 SCOPE 
i 16732 #125252. as TEMP 
i 33 452535 16732 as8, date 
1 1401 BES +4 
l i HLT -MOV FAILED 
13 1 SCOPE 
1965 016706 016722 MOV 328, aac 
197 i 916700 016722 CMP 288: aac 
1971 1401 BEQ “+4 
197¢ i HLT :MOV FAILED 
i 1 SCOPE 
16 ; TEST BIC INSTRUCTION INDIRECT 
197% $0 "thie At e700 BIC 580° x0 
tA e 
1 CMP %0, &OS2S25 
1976 BEG +4 
1976 1 HLT :BIC FAILED 
198C i SCOPE 
198: 1 177777 016732 MOV 8-1. asTEMP 
198: 016732 BIC #125252, as TEMP 
i 016732 CMP #052525, a8 TEMP 
++ 1 BEQ . +4 
Te i HLT :BIC FAILED 
ig 4 SCOPE 
i 18° 4 15; 072700 016722 MOV #-1, aac 
: 7’ 016700 016722 BIC 288, aac 
)< 16722 OS2S525 CMP aac’ #52525 
14 BEQ . +4 
| HLT :BIC FAILED 
1 SCOPE 
; TEST SUBTRACT INSTRUCTION 
i ; ? 2 MOV siesese, 40 
7 1 SUB ae8. %0 
195 00 CMP 70, &O 
001 a TO ae Sd SUS FAILED 
48/8 46 i 4 SCOPE 
+" 
200 012737 125252 016732 MOV #125252, Je TEMP 
: ? 010116 016732 SUB _aaTEMP 
“UU y 14 BEG .+ 
1007 T -SUB FAILED 
1° OPE 
» 6 
4 72 Ol2767 |} 010132 MOV 125252, TEMP 
C O16 010124 SUB aa8. TEMP 
48 7 O101 TST TEMP 
= 401 BEG +4 
014 1% 104000 HLT -SUB FAILED 





oO 
&!) 
wl) 






OOOCC 





ee Se 
14+ 4 v4 


oh gh gh gh 
_2e 26 
v@ «¢ 






+e ot 
ee oe 
a <? «@ ~@ ~¢ 
06 


o 


++ ¢4 44 +4 
_2e 28 | 
rhe be be ae ba 
= 
Dem Bae Ge 
£ 





NNNNN NNN 


a ee ee ee 


O3e? 20-JAN-7"B 11:05 PAGE 40 
-78 11:08 


0i67Se 


0167 Sc 
016732 


016732 


177777 


016732 
016732 


leSese 


007670 


0076S4 


SCOPE 
; TEST UNARYS INDI 
MOV 


sigpese. ,aatTere 


<a asTEMP 


asTEMP 
asTEMP 
#1, as8TEMP 


+4 


#1. a8TEMP 
aetemp 
8-1, aSTEMP 
+4 


@8+e,dB+2 
+4 


;TEST MOVE INSTRUCTIONS 
MOV d8+2,%0 


Ze1NG WITH INDEXING 


CT 
INSTRUC ION 
+2, 
+4 


#12eS52S2, IB+2 
+4 





:; TST 


; COM 


; INC 


-DEC 


;NEG 


: CMP 


; CMP 


; CMP 





MAIN. 
C2QKBH.F1i 


si) saree 
sre Sis 


17 


i ae 
ortr 


eecese & 





Tt: 


NNNN 


500) 
¥ 





MACY11 30R‘10S2) 
20-JAN-78 11:05 





20-Jan-78 


oi6700 
16700 


007602 
016700 


697584 
4 


177777 


o 0 LL LL LL eesessssssssssnssesssnessaenseeseeneneememens 
a 


0076S4 
016732 


007622 
01672e 


gist3s 
Bice 


016722 
007S2e0 
016722 


016732 
007456 


BUNCE 


11:05 Pact 4] 


eS 
BEG 


HLT 
SCOPE 


si2Ses2e.~.0 
+4 
:>“OV FRILED 
#125252, JTEMP+2 
d96, JaTEMP 
, :MOV FAILED 
aB+e , IC+e 
J98, aac 


; TEST BIC gies x INDIRECT WITH INDEXING 


& +2 
“0, 8 es 


;BIC FRILED 
8-1, aeTEMP 
e a TEMP+2 
$a5858- 3 Ene 


;BIC FAILED 
;BIC FAILED 


-SUB FAILED 


#12S2eSe2 ,asTEmMP 
6. STEMP te 


;SUB FAILED 


DOY 














. _MACYLI } -JQN-7G 11:05 Pace 42 
Berd: ew 2a Fads 1 PRE 
2127 ? 1 HLT -SUB FAILED 
2! bora;6 | tpuabe SCOPE i 
gl : TEST ADD INDIRECT WITH INDEXING 
131 007312 oOSo00 CLR “0 
21 4 362 2.0 
i l2S2eS2 CNP #125252, "0 
1 i HLT 2ADD FAILED 
i 1 SCOPE 
i 007370 ADD oizeoc aTEMP+2 
= 
$133 016732 CMP sie * JSTEMP 
14 BEG . +4 
ig HLT :ADD FAILED 
i SCOPE 
144 016732 Vv #125252, da TEMP 
2145 007340 ADD A+, JTEMP+2 
3143 177777 CMP JeTEMP, a-1 
14 BEQ +4 
148 HLT -ADD FAILED 
14 SCOPE 
1 ; TEST UNARYS INDIRECT WITH INDEXING 
1 10 737 177777 016732 MOV s-1 as 
1 I 007312 CLR aTEMP+ 
ei 4 737 016732 TST aaeTEMP 
' 74 ‘aoe ae - TST FAILED 
sie, 88 184088 SCOPE 
gl 3 007434 012737 iasese 016732 mov 8125252, J8TEMP 
+ 
1 mh 737 Qesese 016732 CMP eOs2628, ae TEMP 
1 4 1401 BEG +4 
1 1 HLT -COM FRILED 
164 007460 104400 SCOPE 
ibe 7 016732 CLR aaeTEMP 
1 007242 INC aTEMP+2 
1 74 7 OO000: 016732 CMP #1. JeTEMP 
1 14 BEQ +4 
! HLT -INC FAILED 
Ife 1044 SCOPE 
17 7 016732 CLR aaeTEMP 
174 007216 DEC JTEMP+2 
1 727 O16732 177777 CMP aeTEMP, #-1 
17 AdoA BEG . +4 
l 1 -DEC FAILED 
178 104400 SCOPE 
iB 012737 oO0001 016732 MOV #1. aaTEMP 
1 477 007170 NEG JTEMP+2 
el b 022737 177777 016732 CMP #-1, JeTEMP 


EO4 







.MAIN. MACYi1 3OA(10S2) 20-JAN-"E 11:05 PAGE 43 
CZOGkKBH.Fil 20-JAN-7e aa 
BES +4 
S182 SOTEES PBiags seo rances 
31 t SCOPE 
31 737 i?7777 016732 mov 8-1, aeTEMP 
2l 00714 aoc JTENPs2 
sis Sortog Betas, 7% a 
1¢ i HLT : :@DC FRILED 
1§ 1 SCOPE 
1§ 06 737 O0000: 016732 nov #1, aa TEMP 
1s 007112 sac aTEMP+2 
216 905737 016732 rst oaTEMP 
7 26 1 HLT } -SBC FAILED 
: 7 104400 SCOPE 
303 ; TEST OF COMBINED INDEXING AND INDIRECT 
>C 734 790 177772 MOV 8-6. % 
205 40 016710 i12s2se2 CMP aa‘ O), sl2S2s2 
+", ’ 1401 BEG _ +4 Cow pater 
a: ps2 104400 SCOPE : . 
ic 7654 2700 177772 MOV 8-6, %0 
1 O ieS52e52 016710 CMP #125252, 9Aa(0) 
5 oe 1 400C re — CMP FAILED 
; L 
14 767 1Bugpe SCOPE 
1g 7674 0127 177772 MOV 8-6,%0 
1 90 O1 701 oo00002 MOV a+2°%1 
gig 77 071 O16710 016710 CMP aac), aac) 
0 oat8 rare Ae a CMP FAILED 
7716 tBu tata SCOPE 
; TEST BIC INSTRUCTION 
77 012700 oo0006 MOV #+6, 40 
7 18767 177777 007000 MOV 8-1° TEMP 
77 7 016710 006772 BIC aac). TEMP 
2767 125252 006764 CMP #ieSes2, TEMP 
| 55 1 400¢ cre —_ BIC FAILED 
1BusnD SCOPE 
3 4 0127 177772 MOV #-6,%0 
77 127 177777 016722 MOV #-1' aac 
? leS2eS2 016732 Bic #125252, JTEMP(0) 
77 727 016722 OS2525 CMP aac, s0S2S25 
tobe 1401 BEQ +4 
5 3 i 104000 T -BIC FAILED 
8 O10006 104400 SCOPE 
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MAIN. MACYL1 3OR(10S2) 20-JAN-7G6 11:05 Pace 44 
“ZOKBH.P LI 20-JAN-78 11:05 
10010 oO1 177777 016722 8-i, asc 
1 1 177772 e-6.%0 
12701 17777 e-6.%1 
O16719 0167 aac) aTeme ci 
016722 e0S2S25 dec 
1 «4 
i :BIC FAILED 
! oo0000 00000: #0,81 sT? FIX 
i ; -CMPB FAILED 
; INSTRUCTION INDEXED 
a] 177770 8-10 % :MINUS 10 TO REG CO 
16710 o0GeSe AcG) , e00c2se ;(@ INDEX BY MINLL 10) TO el2sese 
i i : COMPARE WITH INDEX FAILED 
10% 0127 77770 #-10,% ;FOR INDEX 
110 i e780 016710 O0852,ac0) : A INDERED 
oo 
136 j -CMPB FAILED 
1 1 
1 0 10 #i0. «0 : INDEX 
1 poegis 000125 ACG), a000125 
1 1 -CMPB FAILED 
ive | 
144 O 10 #:0,%0 
i 27 6C reteh es 016710 #006125 ,A‘0) 
7” 
i { :-CMPB FRILED 
10164 O 7777 #-i0,"%.0 
i 130 : b1691 0167:0 ACO), ACO) 
_* 
l 1 . -CMPB FAILED 
l 104400 
l 012700 oo0o10 10,0 
1 1 -CMPB FAILED 
i ib4400 
l le? 77770 MOV #-10,%0 
1 $0 515500 co4 MOV a+4 4} 
j 1 O16710 oO16719 CMPB ACOS ACL) 
i aa l 40 : a? sb CMPB FAILED 
10e4%6 104400 SCOPE ; 
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177525 


@C-JAN-7B 11:05 PAGE 45 
1:05 


; TEST MOVE INSTRUCTION FOR INDEX 


MOV 


#-10,%0 
a 
oe 00eSe 


#+10,%0 
ACO), TEMP 
TEMP, 8000125 


#-10,% 


‘0 
Seeraresdee © 


B+ 9 %~0 

EMP (0) 
oeTEMP+{0, s0ses2s 
.* 


;TEST BIC INSTRUCTION FOR INDEXING 
EST BI Up 


Vv 
BICB 
MPB 


HiT 


8-i0,%0 
A(0O), TEMP 
TEMP, #177SeS 
_* 


;OMPG FRILED 


:CMPE FAILED 


;CMPB FAILED 


;>MOVB FAILED 


;MOVE FRILED 


;MOVB FAILED 


;MOVB FAILED 


;BICB FAILED 


= ==. eee SS sss 





HOY 
-MeIN. “eCYll 3OR.10S2° 25-Ian-"s 11:25 fest 6 
“20k BH. P13 20-JaN-"S 15:05 
338 010Sié 104400 SCOPE 
0i0S20 012767 177777 d06204 MOV e-1, TEMF 
2354 O1 012706 ocociC MOV 10° * 
2385 O1 1 016710 O06i72 Bice acO}. Teme 
2 i 006:66 O07ESe C TEMP. 80076S2 
rd 1 1 BEG +4 
1 1 HLT -BICB FAILED 
1 i SCOPE 
10554 01 177777 016742 MOV 8-1, JeTEMP+10 
1 1 o0o000i0 MOV #10,~0 
2363 O01 142760 125252 016732 BICB #125252. TEMP (9) 
3366 1 “8, 016742 oadeses cnPe dsTEMP+!0, seses 
1 104000 HLT -BICB FAILED 
0606 104400 SCOPE 


Po 
os 
£o 
O0O 
aN 
88 
bee 
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oO 
Oo 
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N 
O000000 2000000 


rhb bbe ee ke 
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fu 
N 
— 
af) 
ru 






2 é C TEMP-10, #125252 
37 14 BEQ +4 
74 104 HLT -BICB FAILED 
g ze 0642 104400 SCOPE 
bg 10644 012737 177777 016732 + ewe NOV? saree 
58 61 Be “ 7 177770 MOV #-i0,~0 
1 016742 CLRB DO) 
O1 05737 016732 TSTB aa TEMP 
1 14 BEQ +4 
1 1 T -CLRB FAILED 
10672 1044 SCOPE 
10674 012737 177777 O16732 MOV a-1. aeTEMP 
l 0127 177770 MOV #-10,%0 
1 16742 CLRB (0) 
107 16732 177490 CMP DeTEMP, #177400 
] BEG +4 
0107 :CLRB FAILED 
107 SCOPE 
1 726 177777 016732 MOV #-1,a8TEMP 
107 177771 MOV a-7'°%0 
10740 016742 CLRB D(O 
} 4 016732 000377 chp deTEMP, #000377 
._* 
10754 1 HLT -CLRB FAILED 
: l l SCOPE 
OM : 010760 Ole 177777 016732 MOV 8-1, de TEMP 
24 010766 Ole 000010 MOV #+10,%0 
sige Girog ioe9e? Bibree FE S0Pne 
EM e Bt ooa8 Apia; peu "ae 


"MP-10 
142767 OS2S2S5 006072 BICB #0S2SeS, TEMP-10 
006066 MPB 








Oe be hs be pe be be bee 


MOVE Swr-OD 


PROSE TRERES 
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eee eee see e eee ee ea 
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SRee? 
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NIN 
Ww 
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o0 

SS Se 
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O~~ 
uwiruru 


177777 
000010 
016722 
016732 


177777 


C1673e 


Ci673e 


177400 


0i6732 


016732 


016732 


016732 


0(0) 
aeTeEMP 
PS 


IO4 


8-1, Jeter 
6: 


8-1, asTEMP 
#10,~0 


cio 
aaTEmMP 
.*4 


e-] 
s-10,%0 
0(0) 
aaTEMPr 
+4 


aaTEMP 
%, 


@sTEMP, #177400 
+4 


#-] 
#+16,%0 
C(Q) 
aaTEMP 
+4 


#1. aeTEMP 
#-10,«0 
0(0) 
asTEMP 
+4 


#1,.ageTEMP 
810.0 
C(O 
asTEMP 
"+44 


#1, a8 TEMP 
a-10,%0 
060) 


asTEMP 





; ‘LPG FRILECD 


;COMB FAILED 


;COMB FAILED 


; INCB FAILED 


;INCB FAILED 


;INCB FAILED 


;DECB FAILED 


;DECB FAILED 


NR SaaS tesesnsssesssemesnseneneeeememenee si 











.MAIN. MACYi1 308(10S2) 20-JAN-78 11:05 Pace 4B a 
é2QKBH.P11 20-JAN-78 11:05 SEG COMA 
2463 011260 3727 016732 000377 CMP DaTEMP, 277 
suee 611598 1 4000 i i NEGE FAILED 
Ps Lv 
Pate Olie72 104400 SCOPE 
2468 O11 O1 ? COO00i 016732 MOV 81, aaTEMP 
5469 O11 1 000016 MOV a+ll. x6 / 
2470 O11 i 916722 NEGB ¢(0) . 
247] 0113 Ge 016732 000377 CMP aaTEMP, 377 
247 11 1401 BEG +4 . 
2473 Oll 194000 HLT :NEGB FAILED 
eur O11 1044 SCOPE 
24 11 012737 177777 016732 MOV e-1. aaTEMP 
2477 011358 5786 177770 MOV #-16,0 
O11 34e 016742 ADCB 010) 
11 016732 177400 CMP @aeTEMP, #177400 
2481 011354 1401 BEQ +4 
11 T -AODCB FAILED 
11 1 SCOPE 
11 127 177777 016732 MOV #-1. aeTEMP 
11 1 MOV 9+10, x0 
11 i SEC 
11376 016722 adce C(O) 
114C2 16732 177400 CMP ISTEMP, #177400 
1141 1 BEQ +4 
1i4le 1 Hi T -ADCB FAILED 
11414 104400 SCOPE 
1416 012737 01 016732 MOV #401, deTEMP 
4 790391 MOV a-7,4%0 
4 16742 Sece D(0) 
4 SaBads 0167 CMP el. aeTEMP 
Ley 14 BEG +4 
446 1 HLT -SBCB FAILED 
4 1 SCOPE 
12737 Cl 016732 MOV 81, ae TEMP 
7 arereh ts nov a+10,~0 
016722 SBCB C(G) 
01673e TST Seteme 
104000 ALT iy SBCB FAILED 
! tite SCOPE ’ < 
; TEST INDIRECT SSING 
-TEST C INSTRUC POM 
1237 7 016700 o0Ges2 cMPe daB, e000ese 
10% HLT ; :-CMPB FAILED 
1044 SCOPE 









> 
m 
a 
2 
0 
- 
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177400 
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016732 
016732 


MRACYIL1 iss 2O-JAN-"G 11:05 PAGE 4g 
20-JAN- 11:05 


CMPB aeBel,eeS2 
BEG .*4 
T ;CMPB FRILED 
SCOPE 
CMPEB g#icseSe,aaB 
BEG +4 
HLT -CMPB FAILED 
SCOPE 
CMPB as6 ,as8 
BEG +4 
HLT -CMPB FAILED 
SCOPE 
; TEST MOVE INSTRUCTIONS 
MOVB eB. % 
CMPB acnb2Se2, 0 
BEG . +4 
HLT ;MOVB FAILED 
SCOPE 
MOVB g#i2SeS2, aaTEMP 
CMPB B. aaTEMP 
BEQ 44 
HLT ;MOVB FAILED 
SCOPE 
MOVB ae8, aac 
CMPB B, akc 
BEG +4 
HLT sMOVB FAILED 
SCOPE 
; TEST UNARYS INDIRECT 
MOV 8-1, aesTEMP 
CLRB * 
ae STEMP, #177400 
Q +4 
HLT -CLRB FAILED 
SCOPE 
MOV #l2S2Se, ae TEMP 
COMB ae 
CMP #125125, deTEMP 
nee +4 
HL -COMB FAILED 
SCOPE 
MOV gl epese aeTEMP 
COMB aeTEMP+ 
CMP #0S26S2, deTEmMP 
BES . +4 
HL T ;>COMB FAILED 
SCOPE 


_MRBIN. MACYii JOR(10S2) 20-JAN-"S i1:05 PaGE SO 
°2OKBH.Pii 20-JAN-78 11:05 


11230 91 7 CLR sTEMP 

li BARS, INCB eTEMPs] 

11760 0it732 CMP e400. ae7EMP 

ll 1401 BEG 4 

11 HLT :INCB FRILEC 
il SCOPE 

177% 


1 
1 
107 35 CLR sore 
oe a ne 
le 1481 BEQ +4 


ever rr vey 


oo00 
ae — 
bone 
ie 
<= 
on 
m 


14 | HLT -DECB FAILED 
oisoie iBucoe SCOPE 
1 016732 CLR asTEMP 
oi r039 000001 016733 MOVB #1. a8 TEMP+) 
1 105437 016733 NEGB aetEmP+1 
1 37 177400 016732 CMP #177400, deTEMP 
1 1 BEQ +4 
1 j HL :-NEGB FAILED 
1 1 SCOPE 
; TEST INDIRECT ADDRESSING WITH INDEXING 
:-TEST C INSTRUCTION 
1277 


4 004624 125252 cnPe B+2, slesese 
: -CMPB FAILED 





HLT 

SCOPE 

7 leSeS52e 004606 CMPB #l2eSeS2, JB+2 
1 BEG “ 


01 
1 
012076 104000 HLT -CMPB FAILED 
Ole21 104400 SCOPE 
0121 127777 OG4S74 oOD4s72 CMPB 3B+2, aB+2 
io Ol 1t6 att 1 BEG +4 
1 Ot lle 1940 HLT -CMPB FAILED 
i — 2 TEST MOVE THSTRUCTIONS 
14 O121 117700 oo4s60 R MOVB a8+2,%0 
61S Ol21 22700 i2S5252 CMPB #125252, “0 
1? 6151 40 ALY 5 MOVB FAILED 
1 lel 104400 SCOPE ' ° 
12134 112777 125252 o04s72 MOVB #125252, JTEMP+2 
1214 737 4532 016732 CMPB B, asTEMP 
i t 1 ‘0 : ma? ‘i MOVB FAILED 
“won . 
18126 iB4900 SCOPE 
117777 o04S20 40 MOV aB+2.ac+2 
Bigies 126737 O04510 Cee CMP B,aal 
cess 5} 158 rants ek; — MOVB FAILED 
piste tBug C SCOPE 








MAIN. 


CZGKBH.P1i 


MeCY11 30R(i10S2) 20-JAN-7S 


20-JAN-78 11:95 
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Re i 
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016722 
167 


016732 


016732 
016732 


016732 


177777 


016732 
016732 


11:0s 


MOY 


PAGE Si 


BICB aB+2. x0 
“0, aS2525 


a- TEMP 
Bice sipede> JTEMP+2 
MPB #S2SeS, JaTEMP 
.* 


OPE 
MOV #-1,.aac 
eee 2075: 8622 
HL bs 


OPE 
; TEST UNBRYS INDIRECT WITH INDEXING 
MOV TEMP 


ge Rye 


iin SHesBeE TE 


C aGSeSeS . SSTENP 


CLR gerery 
INCB TEMP+2 
a #1, deTEMP 


Fr? 

HL 

SCOPE 

MOV #1, a8 TEMP 
NEGB atthe. 
CMP #-1, Je TEMP 
BEG +4 

HLT 


; TEST BIE PNSTRUCTION INDIRECT WITH INDEXING 


;BICB FAILED 


;BICB FAILED 


;BICB FAILED 


;CLRB FAILED 


;COMB FAILED 


; INCB FAILED 


;DECB FAILED 


;NEGB FAILED 








C2Q@KBH.P11 20-JAN-78 11:05 
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~ Sy 
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aa. 
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O000000 
fe ee be ee Be pe he 





177772 
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177772 
12SeSe2 
p0008 
16710 
06 
016710 
128252 


177772 
177777 


dieves 


MAIN. MACYL1 JOR(1 } 20-JAN-78 





11:05 PaAcEe Se 
SCOPE 
016732 MOV 8-1, daTEMP 
SEC 
ADCB aTEMP+2 
016732 CMP #177400, asTEMP 
BEG +4 
HLT :ADCB FAILED 
TSTB aeTEMP 
BEO . +4 
HLT :TSTB FAILED 
SCOPE 
016732 nov #1, a8TEMP 
DECB aTEMP+2 
TST aeTEMP 
BEG +4 
HLT ;DECB FAILED 
SCOPE 
; TEST OF COMBINED INDEXING AND INDIRECT 
MOV #-6.%0 
125252 CMPB aac), #125252 
BEG +4 
HLT -CMPB FAILED 
SCOPE 
MOV #-6,%0 
016710 CMPB #125252, 9A(0) 
BEG . +4 
HLT :CMPB FAILED 
SCOPE 
MOV #-6,~0 
MOV g+2°%1 
016710 CMPB gab), aAC1) 
BEQ = a ky 
T -CMPB FAILED 
SCOPE 
; TEST BIC INSTRUCTION 
MOV #+6,%0 
004074 MOV s~-1° TEMP 
004066 BIC aac). TEMP 
004060 Cc #125262, TEMP 
BEG . +4 
HLT :BICB FAILED 
SCOPE 
MOV #-6,%0 
016722 MOV #-1' aac 
016732 BICB #125252, JTEMP (0) 
000125 CMPB aec, #000125 
BEQ +4 
HLT -BICB FAILED 
SCOPE 


—————L— ree 












; TEST THAT RD IS NOT DESTROYED " FALSE SELECTION 
» 40 THIS IS CHECK LATER IN PROGRAM 


MOV 
; TEST JSR INSTRUCTION 


.MAIN. MACYLi 3O0R(10S2) 20-JAN-7S 11:05 PAGE S32 
2ZQKBH.P 1 20-JAN-78 11:05 
2743 
12714 016702 v aB+2,%0 ;@DDRESS OF ADDRESS OF 2 
1 003754 CMP a(0)+.8 
1 BEG +4 
1 1 HLT :CMP FAILED 
i i SCOPE 
. 1 MOV #Be4, «0 
ye 1 CMP a-(0'.8 
th 1 BEG +4 
2753 (Ol HLT ;CMP FAILED 
7S j SCOPE 
576i 1 MOV #8+4.: 
7 : cee 3-(05,8 
5756 1 1 HLT ;CMPB FAILED 
760 Ol 1 SCOPE 
57 1 MOV aC+4._ x40 
t4% 1 016722 MOV 8-1. a8c 
271 13 CLRB 9 (0) 
276! i 177400 CMP eC, #177400 
4, i BEQ +4 
27 13 HLT :CLRB FAILED 
7 1 SCOPE 
2765 1 016722 MOV #-1,a8c 
2770 ; MOV #-6,%0 
a7 7% ] 16732 BTCB Sac Tt TEMPO 1) 
13% pie53s 8! , aac 
130) BEQ 44 
a7 7" 13! :BICB FAILED 
444, 13 
771 
{i 





14 
271 1 J %7, TISR2 PLACE PC ON STACK 
7 Bi 1 TISRI: are RE ON RTS ~% 
278. j TISRe: cnpe 2%46, 8TISR1 Cheek FOR CORRECT PC “on STACK 
4 1 Q +4 
$4 i MOI : INCORRECT PC ON STACK 
I 1 >C S “7 :RETURN TO INST AFTER JSR 
{4 131 TISR3: SCOPE 
¥ : 1 7 Ccc 
: 1 7 JSR “4? Qu? ¢ INSTRUCT Jom UNDER TEST 
: 110 i 4 013110 cnre a46, #TISR3+6 TEST THE STACK 
_* 
279. 131 HLT PC OF JSR DID NOT GO TO STACK 
131 TST (&)+ ‘ REPOSITION THE STACK 
5 ; TEST NESTED SUBROUTINES 
796 013124 ooDes7 ecc ;CLEAR CONDITION CODES 








MACY11 30h: 10S2) 
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100461 
i 
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20-JAN-"s 


003366 


003541 


O0Si4S6 


1S14S6 


047056 


047456 


003544 


003S2e2 


003504 


003462 


003444 


003422 


003404 


003362 


11:05 Pace s+ 


a a 





COS 


7, SUBRE 
.+4 
. +4 


+4 
+4 


SCOPE 
: TEST oo Se BYTE 


cc 


81234S6, TEMP 
TEMP+1 

. +4 

. +4 

#0Si4S6, TEMP 
+4 


#1234S6, TEMP 
reheat 

. +4 

. +4 

#1Si14S6, TEMP 
. +4 


#12e34S6, TEMP 
TEMP+1 


. +4 
#047056 , TEMP 
oe 


8123456 , TEMP 
TEMP+1 

+4 

+4 

#047456, TEMP 
+4 


;JSR OR RTS FAILED 
;JSR OR RTS FAILED 
;JSR OR RTS FAILED 
; JSR OR RTS FAILED 


;CLEAR “Cc” 
;ROTATE ODD BYTE 
;C NOT SET 
;¥ NOT SET 


;ROTATE FAILED 
;SET C 
;C NOT SET 


;V NOT CLEARED 


;ROTATE FAILED 


;C NOT SET 
;¥ NOT SET 


;ROTATE BYTE FAILED 


-SET C 


-C NOT SET 
;V¥ NOT SET 
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l HiT ;ROTATE ODD BYTE FAILED 
189988 SCOPE 
oeee: — cc — :CLEAR C 
£ he555; Behe «40 Fede sg 
i 1 Bcs +4 
1 HLT -C NOT SET 
i BV +4 
HL :V¥ NOT CLEARED 
727 003324 %i.77777 CMP TEMP, #-1 
BE +4 
SHIFT FAILED 
i SCOPE 
7 {77777 903304 a i 1, TEMP 
? 7 3301 ASL EMP+ 1 
1 1 BCS 
i HLT :C NOT SET 
1 BYC +4 
1 HL ;V NOT CLEARED 
727 003264 177377 CMP TEMP, #177377 
1401 BEG +4 
1 HiT -SHIFT BYTE FAILED 
104400 SCOPE 
; TEST COMBINATION OF N, C AND V 
.MACR  TNCV 
+12 
BCC +20 -Z2=1 
BYC +30 -2=1, C=1 
HLT ;2=C, BUT V=1 
BR . +24 
cc -*+16 >Z=6 
BYS .+20 -2=0, C=1 
HLT :2 NOT EQUAL C, v=1 
BR .+14 
BVS +12 ;Z=1, C=0 
HLT :Z NOT EQUAL C, v=1 
Bvc +4 :Z=0, C=0 
HL -2=C, BUT v= 
SCOPE 
ri . ENDM 
005037 O16462 CLR as ICOUNT -NO ITERATION 
; TEST ROTATING NUMBERS 
A039E9 77777 +©000142 aoy ' REFF T E BASE NUMBER 
s- : U 
BAESES bo01 56 TSROT: INC beet NOREREH ¢ NUMBER 
4767 990012 ISR “7 ROTALL :GO TO COMPARE ROUTINE 
727 le6 100077 CMP REFF. #100077 TEST ALL VALUES 
1370 BNE TSROT NO TEST THEN ALL 





1351 
5995 013512 o004Se BR TSRT2A ;WE ARE DONE 
91 013514 016767 000114 000114 ROTALL: MOV REFF, TEST 
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.MAIN. MACYi1 3OA\10S2) 20-JAN-7G 11:05 PAGE S7 
SZQKBH.F 1; 20-JAN-78 11:05 
1 BYS +12 :Z21, C20 
I HLT :2 NOT EQUAL C, V=1 
1 Be +6 
i BYC os :220, ¢=0 
1 HLT ;22C. BUY Vel 
1 SCOPE : 
1 177642 «177636 CMP TES: .REFF 
1 BEG . +4 
1 HLT 
i RTS “7 
1 177627 ROTBO: RORB TEST+1 ;ROTATE BYTE ODD 
i 177623 RORB TEST+1 
1 177617 RORB TEST+1 
1 177613 ROLB TEST+1 
1 177607 ROLB TEST+1 
I 177603 ROLB TEST+1 
1 TNCV 
1 IC BPL .+le 
‘ )3 BCC . +20 ;Z=1 
14ONE Jet BYC . +30 s221, C=] 
14 oC HL T :2=C, BUT v=! 
46 : BCC Te Z=0 
. sxe - ;Z= 
1 3SC "e4C BvS +20 3220, C=l 
14052 104001 HLT :2 NOT EQUAL C, v=! 
{408 ; BVS *i2 2=1. C=O 
a: 8 a 5 = = 
1406C OE HLT :2 NOT EQUAL C. v=! 
1 Ob 34O¢ BR +6 
14064 BYC +4 ;Z=0, ¢C=0 
1406! HLT -22C, BUT v=i 
1407¢ SCOPE 
1407 177540 177534 CMP TEST, REFF 
1410 BEQ +4 
1410¢ Hi T 
i4i04 RTS “7? 
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GOS 


E0-JaN-75 11:05 PAGE SS 


MARIN. MACYLI 3OR(10S2) 
CZQKBH.F Li 20-JAN-78 11:55 
104%400 ROTENI: SC 
7:WILL ALLOW TWO FAST PASSES 
' 17777 INC x '% 77776 
000167 000632 EAESRT 
:@DD AND SUBTRACT ALL aaeens AGAINST FIXED NUMBERS 
-R*B=C, C-A=B, BF wer EQUAL BI 





O1 £67 72 *STARI: MOV a%6 , NU 
: 2 1 177500 MOV i SAE 
267 177474 Q@RITST: INC 


sé 





MACYi1 3OR(1052) 20-JAN-"S 11:05 PAGE SS 
i] 20-JAN-78 11:05 eG 
4 ? 4 SR “7 
13498 8276 PPRSAS ug: 235 e-! 
141S2 } BNE ARI TST 
141 BR ARIEND 
tai 774S0 1774S0 adSUB nov REF TEST 
Hie Sere fea 7s sue. TEST 
4 7 177%26 che REF, TEST 
1 G 4 
14212 | HLT 
14214 104400 SCOPE 
SS ee S * 
4 AR TEND: BOPE 
-TEST ALL COMBINATIONS OF NUMBERS WITH COMPARE INSTRUCTION 
4 FomMPAR: CLR “2 -INIT x2 
4 I CLR %1 : INIT “1 
14 1 CMP1: CMP %2,%1 -ARE THE EQUAL 
14 1401 BEQ +4 
14 HLT ;RO AND R1 DID NOT COMPARE 
14 177777 CMP %2, 8-1 -AT UPPER LIMIT 
14 3 BEG CMe : XIT 
14244 INC %2 : INCREMENT TO NEXT NUMBER 
14 I INC %1 
14 67 BR CMP 1 
14 104400 CMP2: SCOPE 
- TEST COMPL IMENT ING ALL NUMBERS 
4254 452 CL EMP ;BASE DATA 
4 7 4So CLR TEMP+4 “BASE REFERENCE 
4264 005167 O0244 TCOM: COM TEMP COMPLIMENT DATA 
4 50 905367 90244 DEC TEMP+4 :DECREMENT REFERENCE 
4 026767 O02432 002434 CMP TEMP, TEMP+4 : COMPARE 
4 140 BEQ .+4 - TEST 
y HLT COMPLIMENT OR DECREMENT FAILED 
4 002420 COM TEMP 
wie forsee OP" ie Tech ROPER SMES" oS" ES0E OOM 
4 48 1044 ans ; 
4 ; TEST COMB (EVEN BYTE) 
14 7 4O4 CLR TEMP :BASE DATA 
14 7 2404 CLR TEMP+4 ‘REFERENCE DATA 
14 167 2374 TCOM2: COMB TEMP 
4 7 Bass? DEC Ue 
3 b/ 4 002364 002366 CNPB T NP, TEMP +4 ; COMPARE 
.* 
14 1 009 HLT ;COMPLIMENT OR INCREMENT BYTE FAILED 
14354 b 902 S2 COMB TEMP 
z Biases apises OE bee ee 
e ” _— TEST COMB, 000 BYTE) 
3067 014370 oO0S067 002336 ‘ CLR TEMP ;BASE DATA 
3066 014374 CUS067 602336 CLR TEMP +4 -REFERENCE DATA 





Se ee TS 


ao-ew 
nee —_————e | 


MAIN. MRACYL1 JOR jose) ,2g28N-78 14:05 Pace so ‘ 
“ZQKBH. PLL 20-JAN-78 11:05 ES cOtc 
1 ? TCOM3: COMB TEMP +1 ;000 BYTE 
i538 5x se Tete: 
1441 17 002320 CMPe TEMP*1. EMP +4 
144 BEG : 
305 OMB oe 
1 pes3o% INCB TEME +] 
144 BNE TCOM3 
144 SCOPE 
- TEST COMPARE ALL VALUE EVEN BYTE WITH 900 
144 g92e7C CLR rENp ;BASE VALUE 
ie 4% 002263 ‘1SCOMB: cNPB T MP, TEMP+ 1 : COMPARE 
1 HLT ; COMPARE FAILED 
1 BGE +4 
i HLT -¥ IS NOT = TO N 
1 BLE +4 3 
i HLT at date -vV IS SET 
144 epee EE CHP s-i. TEMP 
i BNE TSCOmMB 
SCOPE 
l oO4000 016462 MOV #4000, J#ICOUNT 
14512 WAIT3: SCOPE 
14514 WAITS: 
14514 012737 OO00!I0 o16462 MOV #10, J8ICOUNT 
30S ;TEST TO SEE IF 1/0 DEVICES WERE SELECTED 
03t 1 2737 000377 o01S40 CMPB #377, J#REG LECTED DEVICES STORED IN REG] 
: 1 BEQ WAITS : BRANCH ize NO DEVICES SELECTED 
100 O01 i WAIT - INTERRUPTS WILL OCCUR 
1c 1 1 WAIT -IF DEVICES ARE SELECTED 
10e O1 1 WAIT 
103 l WAIT 
ic 14S WAIT: SCOPE 
105 14544 0127 004000 O164t2 MOV #4000. a8 I COUNT 
ic : TEST SWAB 
1c 14 00 177056 MOV #0200, TEST 
10! 14 eget: SWAB TEST 
i1C 1 BPL +4 
ll 1 HiT 
+4 1 SEQ +4 
Li 1 HLT 
1i4 O1 17703€ SWAB TEST 
1} 1 BMI +4 
hi l HLT 
11 j BNE +4 
Li 14 HLT 
l 1461 SCOPE 
, 146 016462 CLR aeICOUNT 
i : ; TEST ALL COMBINATIONS OF SWAB 
1 Ol4B16 S067 177014 ] CLR TEST ;NUMBER UNDER TEST 
les Sivese 005067 1779 CLR REF : REFERENCE NUMBER 
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.MAIN. _MACYII (4 j e9-JAN-"E 11:05 PAGE 61 
CZQGKBH. FL 2 -Jan-7 11: 
1 l 177 SWABA: SWAB TEST ; OPERATION UNDER TEST 
i 146 7? 177000 176774 cNP TEST. REF ;TEST SWAS INSTRUCTION 
3128 1 HLT -SWAB FAILED 
31 14644 ; 176766 SWAB TEST 
3130 O1 : 176760 INC REF ; INCREMENT REFERENCE NUMBER 
33 1 176757 INCB TES\ 41 ; INC TEST ER 
i 1 BNE SWABA ;LOOP TILL DONE 
133 O01 SCOPE 
i 14664 bis46e _ MOV #4000, ds ICOUNT 
; ee 197 776 
31 1467 002032 MOV #-1, TEMP 
3} 14 SEC 
1 14 ADCB TEMP+1 
i4 147 BcS +4 
14 147] HLT -ADCB FAILED 
i4 147 002012 CMP #377, TEMP 
144 147 BEG +4 
i 14 HLT ;ADCB FAILED 
1 147 SCOPE 
i4 ;PROBLEM 11S O30C 17 AUG 1972 
i 147 000100 MOV #100,%3 
14 147 01673e MOV aTEMP. us 
i 147 177777 016732 MOV 8-1. akTEMP 
j 14744 IT %3. 34S 
1 147 +4 
1 14 HLT :BIT FAILED 
1 14 COPE 
14 ERESRT: . +6 -NOP IF NO ERE 
i “i eens TEST err oo 
l 14762 SCOPE ; TEST OF LOGICAL SHIFT 
i 14764 i CLR ama -LOAD MQ WITH O 
1 147 1 163354 MOV #125252, JAC sLOAD AC WITH 125252 
} 14 1 163362 MOV $-16.,a3LSH -LOAD SHIFT COUNT (LSH) WITH -i6& 
j 163342 ret aac COMPARE AC WITH OC 
: 3 : 19 BEG +4 :GO TO HLT IF BAD 
j 15014 125252 163326 ce #125252, ama ; COMPARE MQ WITH 125252 
\ l Q +4 ;GO TO HLT IF BAD 
1 ] HLT 
! 1 o00020 163322 CMPB #20, JSRE COMPARE SR WITH 2 
1 r BEO _+4 -SKIP HLT IF G 
120 1 HLT :HALT ON ERROR (LEFT SHIFT) 
178 ; TEST RIGHT SHIFT 
17 1 SCOPE ; TEST OF ARITHMETIC SHIFT 
174 Ql 13302 CLR LOAD MQ WITH O 
l l 1 163276 Vv #-1,3AC 7b AC WITH -1 
1 15054 999920 163306 MOV 816. , ASH >LOAD SHIFT COUNT (ASH) WITH I6&. 
l l 163264 TST aac : COMPARE AC WITH 100000 
178 O15 BMI +4 ;SKIP HLT IF GOOD 
312 l HLT -HALT ON ERROR 
i 1807 163252 TST ama ;COMPARE MG WITH O 
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1 20-JAN-78 11 5 O0be2 

150 1 BEO +4 -SKIP HLT IF GOOD 

151 1 HLT :HALT ON ERROR 

151 000110 163246 CMPB #110, aSFE : COMPARE SR WITH 10 

91811 BEQ +4 :-SKIP HLT IF GOOD 
1511 HLT ;HALT ON ERROR (RIGHT SHIFT? 
: TEST NORMALIZE 

15114 SCOPE : TEST OF NORMALIZE 

15116 25252 163224 MOV #125252, aNG -LOAD MQ WITH les 

151 79900 163220 MOV #1700007 JAC :L AC WITH 470000 

151 632 CLR aJNOR : START IZE 

151 0000S 163206 CMP #100005, aAC : COMP AC WITH 100005 

15144 BEQ +4 :SKIP HLT IF GOOD 

151 HLT : HAL T ERROR 

i i OS2S520 163172 CMP #S2S20, amo : COMP MQ WITH S2S20 

1 BEQ +4 -SKIP HLT IF GOOD 

151 HLT :HALT ON ERROR 

151 163164 CMPB 83, aSC -COMPARE SC WITH 3 

151 BEQ +4 -SKIP HLT IF GOOD 

1517 HLT ;HALT ON ERROR (NORMALIZE? 

; TEST MULTIPLY 

15174 SC ; TEST OF MULTIPLY 

15176 163144 MOV #125252, ama LOAD MQ WITH leS2es2 

1 163146 MOV #40000, MUL ‘LOAD MUL WITH 40000 

1 163132 CMP #165252, JAC : COMPARE AC WITH 1652 

i BEQ +4 -SKIP IF GOOD 

1 HLT ;HALT ON ERROR 

1 TST anQ : COMP MQ WITH 10000 

1 BMI _+4 -SKIP HLT IF GOOD 

1 HLT HALT ON ERROR 

i 163114 CMPB #300, JSRE COMPARE SR WITH 300 

1Se42 BEQ +4 -SKIP HLT IF GOOD 

15244 HLT *=HALT ON ERROR (MULTIPLY? 

1 or Oe TEST OF DIVIDE 

j lesese 163072 MOV #125252, aM LOAD MQ WITH lesese2 

lesen E3058 HOV #23010 TOAD DIV HITH 3 IVIDE 

i 163054 TST aac EO ePARE AC WITH O (QUOTIANT) 
BEQ +4 -SKIP HLT IF GOO 

: HL HALT ON ERROR 

152525 163040 CMP #152525, ama : COMPARE MQ WITH 152525 
BEQ +4 SKIP HLT IF GO 
HLT ‘DIVIDE ERROR 
14 SCOPE 
1 & 177777 001406 MOV 8-1, TEMP 
~ B TEMP+1 

i 003393 001372 CMP 8177377, TEMP 

1 BEQ +4 

1 ENDEARE ROPE 

oS2ses5 CMP eS2525, «0 
BEQ +4 

1 4 HLT ;SOME OPERATION DESTROYED «2 
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a> 4> 4g 4D 





000100 


000802 


004440 


177772 


177762 


000024 
oo00ese 


162660 


018574 
015S74 
000010 


162470 
000014 


000014 


Yil ij ) @0-JAN-78 11:05 PAGE 63 
21a es 11:05 


0127 0i6S2e6 
012737 00346 


LOS 


;POWER FAIL VECTOR 


;PROCESSOR PRIORITY 
;SKIP OVER BELL-NOP ON CORE EXPANSION 


;DON"T RING BELL IF TTy IS Busy” 


;PASS COUNT LOCATION 
:SET UP RESERVED INSTRUCTION 


: OFFSET 


; ATTEMPT TO EXECUTE SIGN EXTEND 
;NO TRAP, PROCESSOR IS NOT=20,15,05 


TRAP OCCURRED 
RESTORE HALT FOR RESERVED INC 


e128 TRACE TRAP TO BE rif WITH PROGRAM 


; INHIBIT “T" TRAP IF SET 
;1’ TRAP VECTOR 


;SET TRACE TRAP 
;START OF TEST WITH TRACE ON 


SARE WE UNDER ACT? 
TO BANK ZERO 
;CLER THE WORLD 
tFOR ACT 11 


PATI FAILED PROGRAM FROM TRAP - CAN BE AN RIT 


MOV sPFAIL, Je24 
MOV #340, d826 
SKPBEL: BR Po 
BR 
BIT $100 JTTCSR 
jee. nics compte 
8207, JTOBR 
rere a 
BPL 
SBELL: INC 
MOV 
BIC 430 20 
aBE 
MOV “0, 10. 
6701 
NOP 
MOV #6, J#YESRT 
BEG20: MOV * JSYESRT 
eRSoT Tie 
-ROUTINE TO CHECK 
;SAVE OLD CONTENTS SET UP FOR TRACE TRAP 
YESTR: CLR ) 
BIT 410 , ISRPTR 
MOV x T,ae14 
COM fo 
BEQ 
MOV 
YESTRI: MOV 20,16) 
YESTRe: RTI 
ACT: MOV aeue %0 
BEQ YESTRI 
MOV SCLEAR, 2814 
MOV SCLEAR, %7 
CLEAR: RESE 
LOGICA: JSR 47,920 
NOP 
NOP 
NOP 
IMP aeSTART 
TRPB: 0 
YESRT: RTI 
HAL. 
TRPA: IMP JeBEGIN 
PRFLAG: 


: PRINT 
PRINT 


® 
~ 


I 
INC 


s ENTERED WITH SYSTEM TRAP CALL(H 
I T_ THE “Taras” AND STATUS REGISTER 


~~ 
PRFLAG 


: BEGIN ete BY EXPANSION 
INT ROUTINE BUSY IF NOT ZERO 


;I1S ROUTINE BUSY 


YES EXIT 
:NO SET FLAG 












MARIN. MACY11 3OR(10S2@) 20-JAN-78 11:05 PRGE 64 
°ZQKBH.P11 20-JAN-78 11:05 
oggges c20000 byt SeReTR, e20000 
BEG . +4 
BR PRINT1 
S888 moy (}s:B6NEE 
62116 Sic 5190: STATUS 
I i ® 
38 eBeads fia SteSa 
30. 1S 000206 MOV #215, JTOBR 
C TSTB STCSR 
10 000172 MOV #212, 3TDBR 
iC creed TSTB SFASR 
iC BPL _-4 
l MOV “2, 
i MOV “3, 3 
i MOV x4" SAVRY 
{ ISR “7 PRtAS 
000132 1240. aT 
ire cS 
ie Rte 
J %7, PRT 
000106 nev 8240, aT 
TSTB aTcsR 
0 ROY st 
20 JSR 
*, mov 
0 HOV 
of 000046 MOV 
20. TSTB a C 
7 
: PRINTI: ° 5 aSRPTR 
aC Bel +4 
17 CLR PRFLAG 
0004 162110 Bo #400, 9 RPTR 
162410 MP START 
EXPRINT: RTI 
SA a 
SAVR3: 8 
iDBR: 177566 
TCSR: 177564 
SAVPC: O 
SAVCC: 0 o” 
BUFF=FIN 
o00ese2 PRTAB: CLR BINCT 
000244 CLR WGTCT 








EPR AAT AR ous 
; H TO PRINT 

; ay! RETURN TO a STREAM 
ek Se EMLIra RUTH 
;REPOSITION THE STACK 


;WAIT FOR FLAG 
;FILLER CHARACTER. 


;LINE FEED 


SAVE RY 
-PRINT OCTAL NUMBER 
:SPACE BETWEEN WORDS 


;PRINT OCTAL NUMBER 


;WHERE CPU TEST IS AT 
;RESTORE REGISTERS 


; TEST FOR HALT SWITCH 
;HALT ON ERROR SET 
;CLEAR FLAG WHEN DONE 
;RESTART ON ERROR 
;RETURN TO MAIN STREAM 
;DATA 

»STATUS 


;END OF PROGRAM-SP AREA. 









-MAIN. MACYIJ 30A(10S2) 20-JAN-78 11:05 PAGE 65 
CZ@KBH.P1i  “20-JAN-78 11:05 SEG ODS 


MOV SLIST. «4 ;GET LIST ADDRESS 
MOV eS, ASCENT 
MOV 87. SEVEr 
000214 MOV #1 ,DECML 
i WAITI: TSTB a 
BPL WAITI 
TST x. 
BMI MINUS ;NEG SIGN PRINT 1 
000260 177712 HOV #260, JTOBR :POS SIGN PRINT O 
1 177702 MINUS: MOV seek aTOBR 
i — 35 FObbL CET READY TO BOODLE NUMBER IN TOODLE 
144 COM TOODLE : COMPENSATES FOR COMPLEMENT DURING BI‘ 
140 BIC TOODLE , «3 -AND IN OCTAL CHARACTER 
BEQ WRTOC ;ZERO, WRITE O If. LIST 
0001 000136 MKNUM: ADD DECML ,WGTCT -COUNT UP TO 
000 1 INC BINCT : AND RECORD 
900 1 CMP WGTCT,~3 i SAME INARY WEIGHT 
BNE MKNUM :KEEP COUNTN 
000120 WRTOC: ADD 8260, BINC -ADD ASCII PREFIX 
} 114 MOV BINCT. (4+ : WRITE ASCII CHAR IN LIST 
i 1 009102 ADD VEN, -EXPAND BINARY WEIGHT 
ta Binet 
ke DEC RECT 
3 ay 13} 5 FS FORABD Loop 
37 Soooes O000S0 MOADD: ADD SEVEN, SEVEN ‘MAKING SEVENTY BY SEVEN 
5+ BNE aa 
381 OO0044 xXLIST BOV oe NT SENDS CMA TOr ere eshte 
38% Tpoees WAIT2: TSTB sttSr ‘ 
3 77542 MOV -(4) JTDBR 
338 a008z6 C ASCNT 
{2] Q HM :FINISH PRINTING GET NXT NUM 
I WAIT2 
BI 177530 HDF HM STB aTCSR 
ae = BPL .~4 
139C ‘ RTS “7 :HEAD FOR HOME 
5: 
+ VEN: O 
133. BECHL 0 
WGTCT: O 
BINCT: 0 
ASCNT: O 
LIST: 0 
0 
0 
0 
0 


JULIL ae 





; SCOPE LOOP ROUTINE ENTERED BY USER TRAP 
;SCOPE OR“AND ITERATION LOOP FOR EACH TEST 4000 TIMES 


" 


es 





6406 
“ 
6 


he - pep Rhee mo pee 


0 NOUS Wortue- 





1 
1 
1 
1 
i 
1 
1 
1 
1 
1 
1 


a 
2nd 





ee ee be = be be be Be 


ay 





-— &- P= b= bp bP ps 


1 
1 
1 
i 
1 
1 
1 
1 
1 


004000 161550 


016472 
177766 
177766 
177766 


1 
e 
C166i4 





; TEST SR FOR SCOPE 


ltt FOR ITERATION 
INHIBIT ITERATION 





8. RETURN POINTER 
:RETURN INLINE-NEXT TEST 


;COUNT LOCATION FOR ITERATION LOOP 
SADDRESS OF LAST TES* : 


30 INSTRUCTION 
: ONE DEEP 


; TWO DEEP 

; THREE DEEP 
;FOUR DEEP 
;FIVE DEEP 


;IN CASE OF NO ERE 










CZ2QKBH. P11 


Sat Ssstecsecctssit ae et ey 


giezig 98749 
16712 016714 
016714 


Fees I s+ 4: 
Ba Nou zo 


MARIN. MACY11 3OR( 1052) 
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20-JAN-7S 11:05 Pace 67 
MOV MAC, (40) 
1ei2e8 MOY SMOl(xD>s 
161560 MOV WE ‘+ 
MOV % UB) 
900019 MOV %&. SAVRE 
16622 161214 MOV sRESTART. 24 
HALT 
SAVRE: O 
HAC: 0 
HMQ: 8 
177764 REStaRT: MOV SAVRE, “6 
MOV (46)4,%0 
Hue eee: 
Vv -(%0)° 
161 MCV -(%0); dAc 
000006 CLR aeb 
161150 MOV (6)+,24 
MOV (6)+,%5 
MOV (6)4,%4 
MOV (6)4+,%3 
MOV (6)4+,%2 
MOV (6)4,%1 
MOV (6)+.%0 
016612 CLR aaSAVRE 


5eS 


N: 0 
USER: RTS 


;BUFFER FOR S 
“7 : RLAY USE 
;PDP-11 MEMORY TERMINATION AND SE 
;USE WITH VARIABLE CORE QUANTITY SYSTEMS 


;STORE STACK POSITION, POWER FAIL FLAG 


{STACK I's SAVED HERE 


;RESTORE REGISTER OFF STACK 


;MQ MUST BE LOADED BEFORE Ac 


;RESTORE TIME OUT 
;WHEN POWERING UP 


;POWER FAIL OCCURRED 
;RETURN TO MAIN LINE 


;ADORESS OF B 


;ADDRESS OF A410 


;RDDRESS OF C 


;ADDRESS OF TEMP 


;ADORESS OF TEMP+10 OR “D” 


Pp 
R ROUTINE HERE IF 4YkKW, USE BANe! IF Sky 


DOG 
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812939 _<FIN +4 ;APPLICABLE TO SYSTEM TEST 2: 
017010 OO4440 i76564 DETI: MOV SBEGIN, TRPA+2 
017016 O 2767 900401 176346 MOV #401 SKPBEL :BR +4 
i § 017010 CMP aa. a ;CHECK FOR DOP! 
: soos ree NO CORE EXPANSION WITH } 
{ 9001000 161124 BI #1000, 2SRPTR REE Sanaa E R ORE SWITCH 
1 1401 BEG DET4 ;USE VARIABLE CORE ROUTINE 
i RTS “7 s 4K ONLY 
7122 160722 DET4: MoV sDET2,.4 :T CTOR SETUP 
vee 160716 g1 : ae 337 6 HECK FOR 6 SETUP 
77 VE: : é ek 
Stas 087770 SX EEN, ADC 98077770 -CHECK FOR 16 
13110 139990 THOFOR: ABE Setaoen CHECK FOR 54K 
15} 4 437070 THOE LG; Abe 99125558 : HEE K FOR Sak 
154 DET2 ROV 2 hag RETRIEVE TRAP PC 
171 TST (6)+’ *DISCARD TRAP STATUS WORD 
171 017074 CMP SE IGHT+4, %~2 
171 BEQ T3 > 4K 
171 017100 CMP STWELVE+4 , x2 
Stas BEG ; BK 
1714 017104 CMP aSXTEEN+4 , x2 
171 BEQ TRILe - 12K 
13} 017110 CMP stan Y+4, %2 
17 BEG STRT16 - 16K 
4, 017114 Ch STWOr OR+4, x2 - 
171 B5 TRTSH Ek 
171 MOVE: CLR %0 ;SET UP MAIN CORE CURRENT 
171 MOV (O)4+,(1)4+ ;MO 
171 017006 CMP 40, ef IN+2 : COMPLETE? 
17 BNE .- *MOVE ANOTHER WORD 
17 RTS - MOVE ETE 
17 ooo0040o STRT28: JSR 4.7. XFER28 i START TRANSFER 
17 BR : START MODIFY 
2 10 oo0042 STRT24: J %.7 . XFEROY : TART Sok TRAN FER 
17 oo0044 STRT20: JSR 4.7. XFER20 : START TRANSFER 
17 BR mob16 START 16K MODIFY 
17 000046 STRT16: JSR %7, XFERIG - START 18K TRANSFER 
17 BR mopie -START lek MODIFY 
17 oo00so0 STRT1l2: JSR %.7,XFERI2 -START lek TRANSFER 
i BR ; START BK IFY 
1 oooose STRT8: JSR 4.7. XF ERS : START TRANSFER 
7 BR :START 4K Y 
17 140000 XFER28: MOV #140000, %1 -SET UP MOVE START LOCATION 
17 177710 ISR “47 . MOVE -GO TO MOVE SUBROUTINE 
17 120000 XFER24: MOV #120000, ~1 
17 1777 JSR 47 . MOVE 
17 100000 XFER20: MOV #100000, «1 
1? 4767 177670 JSR %7. MOVE 
017276 012701 O&0000 XFER16: MOV #60000, ~1 





















MACY LI -JAN-78 11:05 PAGE 69 
aa 
17 77 JSR “7 . MOVE 
17 say XFERI2: MOV #40000, «i 
3 i 4 XFERG aay a2 ye 
i Roy = ssgb000, 
l RTS 47 -RETURN FROM TRaNSFERS 
i 1 ise moODe4: of ; a TRPAt 120002 
i 30 mOD20: MOV ( oR eB + 1D0002 
1 le MOV BE | 
1 14 MODI6: MOV i +60002 
1? MOD12: MOV : +40002 
1706 16164 MODB: MOV 1O0E 420002 
174 015746 MOV °E 20000 
174 446 176150 MODY: MOV b. TRPAS2 
174 0 175732 MOV * 5B 
17 DET3: ARTS % sRETURN FROM MODIFY 
;ROUTINE TO SET ACTION NABLE ON'MA/MF PARITY MEMORIES 
-CALL: JSR PC,. 
PARCSR= 172100 ; ADDRESS FIRST MA/MF PA 
PARVEC= 114 : ADDRESS PARITY INTERRL 
ERRVEC=4 
RO=~0 
SP=%6 
Re=%2e 
PC=%7 
1744 0006 OO0004 .MAMF: MOV #WERRVEC+2, J#ERRVEC 
174 C2 oo00006 MOV @RTI. JBERRVEC+ 
17 472100 MOV #PARCSR-RO -GET FIRST CSR ADDRESS 
3= 174 1 MOV #1,Re 
> ~ 
IS ;SET TIME OUT INDICATOR 
3¢ 017466 1S: MOV #1, (RO)+ ;SET ACTION ENABLE IF AvVAI 
3¢ :BRANCH IF CSR NOT AVAILAB 
5° 17472 ASL Re : SHIFT AVAILABILITY” INDICE 
$< 17474 gcc 1$ 
3S 1747 RTS PC 
SS l .PARSRV: HLT :PARITY ERROR 
3S < 1 137 o00S0e aaSTART 
SS ;ROUTINE TO GUTPUT TITLE 
+> 
1 11601 TYPE: MoV (@), «x! 
1 iF Poi MOV (aE), xs 
1 716 o0000e ADD we (%6) 
1 12167 0o00022 LOOP: MOVB (u1)+, CHAR 
1 l BNE 1$ 
1 RTS 4,7 
1 105777 160532 1$: TSTB aTTCSR 
1 100375 BPL 1$ 
17 34 116777 ooo004 160524 MOVE CHAR, JTTDBR 
17544 900000 CHAR: OQ 
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*2OKBH.P LI JAN-75 1 
3612 017546 41 103 oO4SS21 MSc: JASCIZ: 12)«1S) -CZ2QKB-H TIT-4* SYSTEM EvERCICES 
36:5 bisees S08 O201t8 | Babeee . “ 
ae Oa ee 
2618 217576 05410 besige Baudes 
3€:> O:7604 OG 122 ocoois 
36:8 Sooa01 LENE 
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~ Ci6b-ic i626 1631 1660 1666 1672 1678 1685S 1690 1697 1703 1717 ive 3747 
17s5S 1779 17933 1800 210s 214s 220S 2eil ecie 226 e242 ees4 2etc 
2266 2272 2278 2284 229i e2st 2303 2310 23:7 324 2347 23st 2b-3 
2710 2e71& 2723 2730 2e77e 34778 3478 3480 3462 
ac 235 7ils + 3175S 3177 3190# 31932 3205 32i8+4 3220 2444 34596 
ACT ” ‘is 
ADSUB 14160 3013 3018s 
ARIEND O14222 3016 
ARITST 14 34 2012s 3015 
ri § 3 # 8 3381 3385+ 333968 
asSH ? 3705 176% 
2 0616700 17 1941 1946 19S1 1957 1964 969 1970 1976 19930 13938 2005 goal 
4 2059 e070 «= 2077, 2082 2S 083) 2090S iON) Biii)=—s 118 )=—s 33S 3 
2514 2519 25306 36 2S43 2eS4B 2S49 2$33 2604 2609 eti+ 2t<: 
Soee 2627 2634 che 2744 2745S 27sS0 2751 e7Sé e7sS7 347 i8 3473 347 
BEGANY O15466 3e58s8 
BEGIN 094440 B08 9C0 1102 l62e1l8 3269 3284 3419 3501 3S6e 3564 3SbE 3565 772 
ae geek, 7" 
e 
tT Tae 3366+ 3369+# 3370 3373 33958 
= 
UFF = O17 78 7 7 736 817 16S 334S8 
eer” Bieree eC 
# og * & * 2 e4oxe 
euage 2438 C4S4s SoS as gi 6 2eSOb* at sé33 sEzee 5E37 cb47* o64ee cbs 
2737% 2739 2762 2763* 2765 2769* e773 ° 34658 3486 34es 
“ = 177776 4 31368 
HAR 17544 # 3609 36118 
LEAR S4 3 3274 32758 
LINCT 874 1009 10le* 1019% 10318 
30328 3039 
3038 304508 
875% 1001* 1002 1013 1015* 1017* 10298 ; a oe 
1808 1824 1839% 18Ss+# 1871# 1888+ 1906+ 2380+ 2388+ 2236+ e4ilcs 24274 cos 
24628 2479% 2497 34948 
B13 914 917% 919% S238 
814 930 931 S348 
81S 2 94S*# 947 951 
Bibs 9SS* 956 967+ 971 
33528 3365 3371 33938 
B16 838% 961 9738 
832 35018 3504 
3510 35198 
834 835 3$22 35748 
3308 35108 
7158 3219% 
869 11108 1163 1171 lele 
7S4# 3007 31558 
35les 3$21 
3156 32338 
33 Os 3S586# 3587+ 
6 77938 
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at 


eee es 


839% 
342 


11:05 PAGE 
11198 11S4 
34968 3S00 

778 793 
1075 1075 
1633 166 
1741 1750 
1842 18s0 


937 


980 


3534 


948s 


09S* 
i173 


983+# 


11028 


i006 


366* 


991 


1654 


I06 
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7168 3191 


we By se xm 


35738 
qoee 3237 34358 
Fy 3283 3292+ 3333* 
609 32898 
33308 









She lill# 1163 
569 11068 1163 1177 1219 
7018  1069% 
+4 863% 1071 1073 
6998 *  1068* 1077 #1078 
BoG# 18F1 1080* 10828 
10688 1076 1081 
7008 1070# 
5938 1070 
10698 1079 
11048 i212 
2941e 3011* 3012* 3018 3021 3124*% 3126 3130* 
630s 2904* 29065 2910 2935 29398 2941 2943* 2944* e947 2950 2973 2335 
774% 78S 901s 3098 
ma li 
s 
“Fain “aaae 1621 3322 3412 3415 3419 
i * 8 
kon 6968 1086 
a p78 Beis 1088* 1990 
RF 6938 1095 
RF 6948 1085* 1094* #1097 
RF pe 857% 1088 1099* 11018 
RFS 10848 1093 1100 
RF WC 69568 1087 
RFWORD= SS4a 1087 
RF 10868 1096 1098 
RK 7078 103S* 
ae 70es 862+ 890* 1037» #1039 
RK 7058 1034* 1043 
Ak 6 gs 1037 1047 oso 
yt * 10508 
RKSTAR 002314 10348 1042 1048 
ai D0034C 7068 1036s 
RK = alate Ssie 1 
xt 00e32C 10358 1044 1046 
L Riera 29305 29108 
ROT 313674 294s 2950 
T D:40C 2946 29778 
TEN! O1410¢€ 2949 30038 
so04e4 7358 1105S 
RPCA 900410 7298 106 
RPCSR 000426 7368 847 BYSs gs0 B64* 1052% 1953 10S7* 1059 
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RPCSRH 7378 
7318 
7308 
7338 
7328 BSe ss4# 
QPF 7388 860+ 10S7 1065+ 
RRS ise i 1066 
RPWORD= S928 1056 
t 105Ss8 1064 
RTIA Bil gss 8864 9028 
VCC 3298# 3317 33448 
3297 sale 33438 
3309 33388 
VR 3310 3 33398 
VRY 33ii# 3 33408 
VRE § 775 777% 3448s 34S18 3455S 3468# 
LL 3243 32488 
sc 0354 712s 31398 S446 3457% 
SCOPE = !04400 Sse 788 794 803 806 1622 1629 1634 1663 1669 1675 1681 1686 
1693 1700 1706 1713 1721 1728 1735 1742 1751 1789 1767 1775 1782 
1789 17396 1803 18le 1820 1828 1836 1843 1851 16s9 1867 1875 1883 
1835 1901 1910 1919 1927 1938 1944 1949 19S4 1961 1967 1973 1980 
1 1994 2002 2008 2015S <022 20e9 2036 2043 2050 2057 2062 2067 
2074 2080 e086 2094 2101 2108 2115 elel 2128 2136 2143 2149 21S7 
2164 2171 2178 218s 2193 2201 2208 2e14 e221 2230 2238 e246 e2eSl 
2257 2263 2269 2275 2281 2287 2294 2239 2306 2313 2321 2328 2335S 
sacs sue) 383 a 3758 Ses 23392 2400 2408 2416 24e4 2434 e44e 
4 83 492 2501 2510 2517 eS2e 2S28 2533 2540 
Spa8 SPae sg 2eS66 ce so00 2587 2s9S 2602 2607 e612 2618 e624 
26 4S 26S2 Ss 2673 2680 2687 2698 2706 2713 2719 
27 2734 2742 thoy 2754 2760 2768 2776 2787 27 2808 2810 2821 
28 2ey4t 23S6 2880 2302 2934 2972 2998 3003 3017 3024 3027 
3040 3052 3065S 30 3091 3093 3104 3119 3133 3146 3154 3158 3:73 
31 3202 3216 3226 3233 
“gle wines 
# S411 3414s 34188 
3309 3410 34148 
3351# 3360 3371 3377% 33928 
Tore on" 3563# 356S* 67# 3569+ 3571 3573+ 
873% 1001 1023 1025 1027% 10308 
7138 3168 3183 3211 
goe 767 770% 774% 898 3263 3294 3330 3334 3405S 3407 3507 
3 33608 3380 
58 cea. 7608 3280 3336 3598 
Sis 783% B19 a9S* 978% 988 3300+ 
3 354Ss8 
35 5 0 oSeuie 
3) E38 
3518 35378 
3524 35478 
B21 8238 
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T j 853 Scbs 
2} 86 8e9 S3is 
1 833 6368 
832 837 640s 
ale S448 
esses 
84S 66Ss 
B66 8708 
871 872 880s 
883 389 B9is 
qieee 3425 
& 
a 
a 31 
2739 34318 
iene 3132 
3 ls 723 724 726 727 
sites 1170# lells# 
5338 B69# ll2e* 112S5% 112e7% 1129 1138 1142 1152 libl1* 1163 1171s 1173 
1177# 1160 1186* 1191% 1195 1205+ lele* 1215 1219+ 
4 11 1145 1148 1183 1198 1201 
7# 11168 1126* 1132 1147 1148 1158 1183 1200+ 1201 
867 11138 1126 1198 
ll 11298 
11278 1133 
1134 11378 
1137 1142s 1176 
ijeee 1178 
ess B68 1119% 1124s 1137% 1157% 1164 1168+ 1176 1190# 1209+ 1218* 
‘hice 4S 1s8 
4g 1 
aoeee Bare 
a) 1204 12098 
Of 744 748 leli 1224s 
JI 1209 121S8 
JO 1164 11808 
JI ll iiss 
Jt 1184 11908 
Ot ll 11958 1218 
' 1 * 1220 
J {738 3301 3304 3307 3315 3320 3328 3342s 3353 3382 3288 
. } ll 1189 
. 113) iiuee 
. 1170 1 Sse 
. 136° 11738 
a 68 1169 1210% 
J 7418 lel3 
y 74S8 47 
: oe 3303% 3306# 3314 3319% 3327% 33418 3357# 3359# 3384 
° 1 38 1718 1724s 1725 1731% 1738 1739 174S# 1747# 1748 1753+ 175S* 17S6 
1761+ 1763% 1764 1770* 1771 1772 1777 1779 1784s 17S86* 1731+ 1733+ 1798 
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i, ise" sa 
3 5 a3: 
133 1 1$9# 2i 
73% 1 * eeess 
$55 $i: 
* ’ 
e433 8: e103. 
* 
* * 
> 
i a 
B * 
# * 
TEST ibs 3373, 2951+ 
* es 3 
l2e3* 
# 
® 
* 2791 33918 
; & S : 825% 886s 9093 920% 
: ¥ ots 3S6e% 3564s 3566 3568+ 3570* 3572* 
8 
T ls 
T & 
T & 
T 4 7S 739 802e# 804 80S+* 8e2* 887 927 3242 3667 
T & 1s 3609+# 
TT BY 
tT a3" 91 9208 
TT 1015 ate gies 
ty 3¢138 3523 
T “ iss 3527 
| * 178 
T ‘ 168 3529 
T ‘ 646 9278 
ea Bl sea 
- 4 34978 
s 3 ¥ 3354 
" 33828 3383 3387 
, 30938 
0 30939 31048 
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TNC 28628 2919 29S” 2963 

. ABS. Ol7rbie ooo 

ERRORS CETECTED: QO 


zQK IN CZQKBH 
REIS adic! § 
DO: Iik 
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